my $export_file = "//myserver/app/finder/users.txt"; print "****Path = $export_file *****"; open(SOURCE, "< $export_file") or die "Couldn't open $export_file for reading: $!\n";{ my @raw_data=; print "****** @raw_data ******
"; close(SOURCE); }