if ( $line =~ /^1.*?MSC.NASTRAN.*?PAGE/ ) {
    my $name = <FILE>;
    
    $loadname = $name if ($name !~ /^\s*$/ );
    next;
}