#!/usr/bin/perl
#


use strict;
use warnings;

my $mounts = `mount | grep 'type nfs' | awk -F/ '{print \$1,\$3}' | sort`;

print $mounts;


mounts now looks like this but I have no idea how I read in the two colums into a hash of hosts with array of mountpoints.

this is the file coming in but not in full

host1 /var/mount1
host1 /var/mount2
host2 /var/mount5
host3 /var/mount3 
host3 /usr/mount1