open my $handle,'<','filename' or die "open of 'filename' failed: $!\n";