my $abs_filename = "x:\\myfiles\file.txt";
   open(RESTART, "<$abs_filename")
       or die "Can't open $abs_filename: $!"; 
   while (<RESTART>) {
       # do something with $_
   }