Needless to say this has many errors.#!usr/bin/perl -w use strict; my @list = (26, 3, 53, 65, 9, 101, 19); @list = sort( @list ); min_str(); max_str(); sub min_str { print "n\"; print "$list[0]\n"; } sub max_str { print "$list[7]\n"; }
In reply to Re: Rountines
by bmhm
in thread Rountines
by bmhm
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |