寒假【perl语言学习脚本】13.1 13.2 13.3 13.4 13.5 13.6 13.7 13.8

#!/usr/bin/perl -w print “which directory?(Default is your home directory)”; chomp(my d i r = < S T D I N > ) ; i f ( dir=<STDIN>); if( dir=<STDIN>);if(dir=~/\A\s*\Z/){#空白行 chdir or die “c
相关文章
相关标签/搜索