http://www.perlmonks.org?node_id=1038865


in reply to Re^2: Shorten the headers of a file and remove empty lines using perl
in thread Shorten the headers of a file and remove empty lines using perl

Ah, I didn't see your problem clearly. First, you should use strict; as well as use warnings;, which you did, in the header of your program. Then, you have to assign the name of your file to $genome.

my $genome = 'whateverthename';

(You must assign a name to your output file also)