寒假【perl语言学习脚本】1.1,1.2,1.3
############################################
#ex1-1.pl
###1-precitise
#!/usr/bin/Perl
print"hello world\n";
print"hello world\n";
use 5.010;
say"hello world!";
############################################
#直接在命令提示符后面敲perldoc -u -f atan2
############################################
#ex1-3.pl
#!/usr/bin/Perl
@lines = perldoc -u -f atan2
;
foreach(@lines){
s/\w<([^>]+)>/\U$1/g;
print;
}
print"the answer is ";
print 6*7;
print “.\n”;