Skip to content

Instantly share code, notes, and snippets.

@sashaphanes

sashaphanes/openDNAfile.pl

Created September 28, 2012 14:42
Show Gist options
  • Save sashaphanes/3800282 to your computer and use it in GitHub Desktop.
Save sashaphanes/3800282 to your computer and use it in GitHub Desktop.
Download ZIP
openDNAsequence
Raw
openDNAfile.pl
#!/usr/bin/perl -sw
my $DNAfilename = 'exampleSequence.txt';
open(DNAfile, $DNAfilename);
my $DNA = <DNAfile>;
close DNAfile;
print "DNA sequence:\n\n";
print $DNA;
exit;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment