代码： 全选
tlcr: 0 庚寅年六月廿一日 07:42:00 ~
>> time l
lrwxrwxrwx 1 tusooa tusooa 6 [己丑年腊月初十日 12:02] Apps -> 应用
lrwxrwxrwx 1 tusooa tusooa 14 [庚寅年六月十九日 16:44] Dropbox -> 共享/Dropbox
lrwxrwxrwx 1 tusooa tusooa 6 [己丑年腊月初十日 12:01] Private -> 个人
lrwxrwxrwx 1 tusooa tusooa 6 [己丑年腊月初十日 12:01] Share -> 共享
drwxr-xr-x 12 tusooa tusooa 4.0K [庚寅年六月初六日 22:35] 个人
drwxr-xr-x 5 tusooa tusooa 4.0K [庚寅年五月廿五日 9:56] 共享
drwxr-xr-x 15 tusooa tusooa 4.0K [庚寅年六月初六日 15:17] 应用
ls-l -h --color=always -X 0.54s user 0.15s system 85% cpu 0.798 total
tlcr: 0 庚寅年六月廿一日 07:43:31 ~
>> 实现：
代码： 全选
一日 07:45:22 ~
>> which l
l: aliased to ls-l -h --color=always -X --time-style="+^[[33m[^[[32m%Y-%m-%d ^[[35m%k:%M^[[33m]^[[0m"
tlcr: 0 庚寅年六月廿一日 07:45:33 ~
>> ds-打印脚本.bash ls-l
#!/usr/bin/env perl
# vim : ft=perl
$lsCmd = '/bin/ls -l';
#$lsCmd or die "没有找到 ls。你应该安装 GNU coreutils。\n";
$cmd = "$lsCmd";
for (@ARGV)
{
$cmd .= " '$_'";
}
system "$cmd | tee /tmp/ls-l &>/dev/null";
open IN, '<', '/tmp/ls-l' or die "无法打开/tmp/ls-l: $!\n";
while (<IN>)
{
/([0-9]{4})-([0-9]{2})-([0-9]{2})/ or next;
chomp($cmdOut = `lc-农历.py -S $1 $2 $3`);
#s@\[.*\$\((.+)\).*\]@$cmdOut@;
s@[0-9]{4}-[0-9]{2}-[0-9]{2}@$cmdOut@;
print;
}
close IN;
tlcr: 0 庚寅年六月廿一日 07:45:39 ~
>> 待会儿用python再写一遍。
