So is this one of those instance where perl will do different things based on what subs are defined?
When I try:
#!/usr/bin/perl -w
use strict;
sub System {
print "System\n";
}
sub out {
print "out\n";
}
System.out.print("Just another perl hacker?");
I get no errors and it prints both "System" and "out"....
Update:
#!/usr/bin/perl
# comment out these two lines to change meaning of construct in main
sub System { return "SystemSub " }
sub out { return "OutSub " };
my $val = main();
print "\n'$val'\n";
sub main {
System.out.print("Just another perl hacker?");
}
-Blake
|