z*u
2 楼
发信人: zhangdayou (张打油), 信区: Poetry
标 题: 转载 五言两首
发信站: BBS 未名空间站 (Thu Aug 25 09:27:59 2011, 美东)
发信人: zhangdayou (张打油), 信区: Poetry
标 题: 五言 两首
发信站: BBS 未名空间站 (Tue Aug 23 13:53:01 2011, 美东)
一：
云疏湿气重，蔫绿掩衰花。
倦鸟弱归鸣，痴心思去葩。
帘风空添岁，醉月徒照茶。
烟障喧嚣里，怎堪话桑麻。
二：
离家十数载，异域寄此身。
书剑就东市，田园复西巡。
久别唯谋道，终归不话贫。
辛酸知多少，向隅泪沾巾。
标 题: 转载 五言两首
发信站: BBS 未名空间站 (Thu Aug 25 09:27:59 2011, 美东)
发信人: zhangdayou (张打油), 信区: Poetry
标 题: 五言 两首
发信站: BBS 未名空间站 (Tue Aug 23 13:53:01 2011, 美东)
一：
云疏湿气重，蔫绿掩衰花。
倦鸟弱归鸣，痴心思去葩。
帘风空添岁，醉月徒照茶。
烟障喧嚣里，怎堪话桑麻。
二：
离家十数载，异域寄此身。
书剑就东市，田园复西巡。
久别唯谋道，终归不话贫。
辛酸知多少，向隅泪沾巾。
a*e
3 楼
目录里有的是小写文件名，有的是大写，怎么都改成大写？
k*m
4 楼
Bulletin of the Chemical Society of Japan (1998), 71, (2), 467-473
http://www.jstage.jst.go.jp/login?mid=bcsj&sourceurl=/article/bcsj/71/2/467/_pdf&lang=en
Thanks!
http://www.jstage.jst.go.jp/login?mid=bcsj&sourceurl=/article/bcsj/71/2/467/_pdf&lang=en
Thanks!
v*a
5 楼
下了。这软件是我提到几个中最流氓的一个了。我装了用过不到10次。基本还是两个PP
主打。
【在 i******t 的大作中提到】
: 咋整
主打。
【在 i******t 的大作中提到】
: 咋整
L*1
6 楼
Try this:
#!/usr/bin/perl
my $dir = "/tmp"; # change it!
print "$dir\n";
opendir(DIR, $dir) || die "Error in opening dir $dir\n";
chdir($dir);
while( ($filename = readdir(DIR)))
{
next if (-d $filename);
print "$filename\n";
my $new_filename = uc($filename);
print "-- $new_filename\n";
#system("mv $filename $new_filename");
}
closedir(DIR);
exit;
~
#!/usr/bin/perl
my $dir = "/tmp"; # change it!
print "$dir\n";
opendir(DIR, $dir) || die "Error in opening dir $dir\n";
chdir($dir);
while( ($filename = readdir(DIR)))
{
next if (-d $filename);
print "$filename\n";
my $new_filename = uc($filename);
print "-- $new_filename\n";
#system("mv $filename $new_filename");
}
closedir(DIR);
exit;
~
a*e
7 楼
how to run it? save it as a txt and chmod +x?
【在 L*1 的大作中提到】
: Try this:
: #!/usr/bin/perl
: my $dir = "/tmp"; # change it!
: print "$dir\n";
: opendir(DIR, $dir) || die "Error in opening dir $dir\n";
: chdir($dir);
: while( ($filename = readdir(DIR)))
: {
: next if (-d $filename);
: print "$filename\n";
【在 L*1 的大作中提到】
: Try this:
: #!/usr/bin/perl
: my $dir = "/tmp"; # change it!
: print "$dir\n";
: opendir(DIR, $dir) || die "Error in opening dir $dir\n";
: chdir($dir);
: while( ($filename = readdir(DIR)))
: {
: next if (-d $filename);
: print "$filename\n";
j*a
8 楼
for i in *; do j=`echo $i | tr a-z A-Z`; echo mv $i $j; done
要是觉得可以就把echo去掉
【在 a*******e 的大作中提到】
: 目录里有的是小写文件名，有的是大写，怎么都改成大写？
要是觉得可以就把echo去掉
【在 a*******e 的大作中提到】
: 目录里有的是小写文件名，有的是大写，怎么都改成大写？
a*e
9 楼
thanks a lot.
that's what i am expecting, some simple bash script
bash is so powerful.........
【在 j*a 的大作中提到】
: for i in *; do j=`echo $i | tr a-z A-Z`; echo mv $i $j; done
: 要是觉得可以就把echo去掉
:
that's what i am expecting, some simple bash script
bash is so powerful.........
【在 j*a 的大作中提到】
: for i in *; do j=`echo $i | tr a-z A-Z`; echo mv $i $j; done
: 要是觉得可以就把echo去掉
:
Z*0
10 楼
maybe works.
rename ‘y/a-z/A-Z/’ *
rename ‘y/a-z/A-Z/’ *
相关阅读
化学版还挺自我麻痹的这样的图式怎么画的？Chase Freedom CardPapepr help with link, thank you一个为有志于从事学术的人的PhD offer评价方案，大家提点意见help needed for a paperpaper help,thanks!One PPS paper for help分析化学什么方向最好找工作求文献3篇神马学术追求 都是浮云Wolf chemistry 2011paper helppaper help, link inside12华人冲进全球顶尖一百化学名人堂Top 100 Chemists, 2000-2010paper help求paperpaper helptop10学校做计算化学如果不做postdoc能找到啥工作？