in reply to Using Subroutine Returns
This returns "config('username') is my username" instead of "rlang is my username."
The reason that this doesn't work is that Perl doesn't know that config('username') is a subroutine!
print config('username'), "is my username\n";
should work fine. Perl print is a smart critter. There is no need for "." here. You just need comma separated things to print. Here are some examples..
#!/usr/bin/perl -w use strict; print blah(); #Note: print blah instead of print blah() won't work! print "\n"; print lots_of_blah(); print "\n"; print blah(), " ", lots_of_blah(),"\n"; print lots_of_blah_with_newlines(); print blah(), " ", join(" ",lots_of_blah()),"\n"; sub blah { return "more blah"; } sub lots_of_blah { my @stuff = qw(a b c d); return @stuff; } sub lots_of_blah_with_newlines { my @stuff = ("a\n", "b\n", "c\n", "d\n"); return @stuff; } __END__ prints... more blah abcd more blah abcd a b c d more blah a b c d
|
|---|