>>>>> "Giorgos" == Giorgos Keramidas <[email protected]> writes:
Giorgos> This means you can write your sh version like this in Perl:
Giorgos> #!/usr/bin/perl
Giorgos> if (int(@ARGV) == 0) {
Giorgos> die "No args; at least one filename expected";
Giorgos> }
Giorgos> printf("%s\n", join(' ', (@ARGV)));
Which, when you're not speaking Perl with a C accent, expressed more
"natively" as:
@ARGV or die "No args: at least one filename expected";
print "@ARGV\n";
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<[email protected]> <URL:http://www.stonehenge.com/merlyn/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
_______________________________________________
[email protected] mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-questions
To unsubscribe, send any mail to "[email protected]"
