my ( $filename, @nonrelevant, $accounts ) = split( /\t/, $line );