my $export;
my %exports;
open(OUT, "<", "$OUTF") or die "cant open file: $!";
while ( my $line = <OUT>) {
    next unless $line =~ /nfs/;
    chomp $line;
    ($export = $line) =~ s/\s+"(.*)\s+nfs.*/$1/;
    $export =~ s/\s+//g;
    $exports{$export} = 1;
}