@Fields = /(\S*)\s+(\S*)\s+(\S*)(.*?)(\d.*)/; 

##</code><code>##

push @List, "@Fields[2,3,-1]"; # Fix the columns as necessary.