Select Code to Download

#!/usr/bin/perl -w

...

print GENOMIC $ua->request($req)->content;
close (GENOMIC) || die "Error: Can't close genomic_dna: $!";

[dswan@ashtaroth useful]$ ./genomic.pl
Bareword "hgc" not allowed while "strict subs" in use at ./genomic.pl 
+line 18.
...
Bareword "hgc" not allowed while "strict subs" in use at ./genomic.pl 
+line 18.
Bareword "dna" not allowed while "strict subs" in use at ./genomic.pl 
+line 18.
Execution of ./genomic.pl aborted due to compilation errors.