my $nfs_file = '/auto/somewhere/testfile.txt'; my $local_file = '/tmp/testfile.txt'; my @stat_stuff = stat("$nfs_file"); print "Device for nfs file is $stuff[0]."; @stat_stuff = stat("$local_file"); print "Device for local file is $stuff[0].\n";