There is a short way to do it, but it's a bit complicated for beginners to understand:

use strict;
use warnings;
use Data::Dumper;

my @config =
  (
   '/home       filer1232:/vol/home1',
   '/mystuff    filer1233:/vol/project',
   '/data       filer1234:/vol/example_data',
   '/software   filer1255:/vol/my_software',
   '/tools      filer1235:/vol/my_tools',
   '/docs       filer146:/vol/my_documents',
  );


my @mounted =
  (
   '/home       filer1232:/vol/home1',
   '/mystuff    filer1233:/vol/project',
   '/data       filer1234:/vol/example_data',
   '/tools      filer1235:/vol/my_tools',
  );

my %diff;
@diff{@config}=();

delete @diff{@mounted};

print Dumper [keys %diff];
[download]

output

$VAR1 = [
          '/docs       filer146:/vol/my_documents',
          '/software   filer1255:/vol/my_software'
        ];
[download]

See also

Using hashes for set operations...

How do I compute the difference of two arrays? How do I compute the intersection of two arrays?.

(EDIT:repaired FAQ link)

Cheers Rolf

Comment on Re: How to find the difference between two text files using a hash array Select or Download Code