perl编程实例,与书配套的实例代码
$name="Suzanne"; # These variables are in package main
$num=100;
package friend; # Package declaration
sub welcome {
print "Who is your pal? ";
chomp($name=);
print "Welcome $name!\n";
print "\$num is $num.\n";。。。。。。。
2022-08-09 17:32:53
414KB
perl
1