open(IN,"<$file") or die "Cannot read $file: $!\n"; my @content = ; close(IN);