open(INF,$filename); @indata = <INF>; close(INF); @sorted = sort { lc($a) cmp lc($b) } @indata; [download]
In reply to File Sorting Question by vbrtrmn