Help for this page
use strict; open (LST, "c:\\list.lst")||die "$^E : $!\n"; ... print "\n************************\n"; } close (LST);
sort{$a <=>comp <=> $b} #this is wron but it looks like something I ha +ve seen