#!/usr/bin/perl -w
# Storing DNA in a variable, and printing it out

# First we store the DNA in a variable called $DNA
$DNA = "ACGGGAGGACGGGAAAATTACTACGGCATTAGC";

# Next, we print the DNA onto the screen
print "$DNA\n";

# Finally, we'll specifically tell the program to exit.
exit;

