in reply to Perl and Shared drive

Have you tried using the standard way?
open(IN, "< //system/share/dir/filename") or die "...";