Help for this page
use sort '_mergesort'; my @sorted = sort { substr($a, 0, 1) cmp substr($b, 0, 1) } qw( foo bar baz );
package Mod; ... sub baz { print "$baz\n" }; 1;
www.com | www.net | www.org
No recent polls found
