脚本语言
来自北方的闯哥
天若有情天亦老,人间正道是沧桑
展开
-
自己写的转换二进制到十进制的awk
awk { Idx=0 Result=0}{ while(Idx { #print 2**Idx"|"Idx"|"substr($0,(length($0)-Idx),1)"|"Result Result+=(2**Idx)*substr($0,(length($0)-Idx),1) Idx++ } print $0"|"Result}END{ } a原创 2009-12-02 21:33:00 · 781 阅读 · 0 评论 -
find和tar的组合
find 和 tar 组合,发现丢失文件,命令如下: find directory -name "*name*" | xargs tar -cvf demo.tar 后来这样tar 1. find directory -name "*name*" >>demo.txt 2. tar -cvf demo.tar -L demo.txt 这样就没有丢失文件, 原因是一个系统参数的问题: lsattr原创 2010-02-23 21:56:00 · 2825 阅读 · 0 评论 -
一句话求出前N天的时间
perl -e 'my($Day,$Mon,$Year)=(localtime(time()-N*86400))[3,4,5]; printf("%d%02d%02d/n",$Year+1900,$Mon+1,$Day);'其中把N替换为任意数字就可以了原创 2010-08-23 14:01:00 · 287 阅读 · 0 评论 -
bash中关于变量的一个问题
<br />bash 的一个缺点:<br />使用eval,循环给变量赋值的时候,如果是下面这种形式,退出后,该值就会丢弃,如下:<br />cat ${ConfigFile} | while read Record<br />do<br /> if [ "X${Record}" = "X" -o "X`echo ${Record} | awk '{print substr($0, 1, 1)}'`" = "X#" ]; then<br /> continue<br /> else原创 2010-08-27 17:03:00 · 432 阅读 · 0 评论 -
perl脚本中报错:Use of uninitialized value
perl脚本中报错,是没有加 use strict;或者增加了-w 等,解决办法就是使用的时候先判断一下if (defined($var) && 使用$var变量)原创 2010-10-07 17:58:00 · 6571 阅读 · 0 评论 -
经典:SHELL echo输入不回显
<br />#!/bin/sh<br /> <br />stty -echo<br />echo "Enter password: /c" <br />read PASS<br />stty echo<br />echo "You Put $PASS"原创 2011-01-04 11:02:00 · 1829 阅读 · 0 评论