while( <FILE> )
{
    my( $pos, $cons1, $cons2, $cons3, $cons4, $cons5 ) = split;
...