open my $FILE, '<', $filename 
  or die "Cannot open file '$filename': $!\n";