$PDL::IO::Misc::colsep = ","; ($mid, $cid, $var)=rcols "$filename"; [download]
In reply to perldl stuck loading? by Blue_eyed_son