my $file = (split(/\s*\|\s*/,$line))[2];