Exercise 5.1

Return to Week 2 Exercise 5.1 in Beginning Perl for Bioinformatics

#!/usr/bin/perl -w
use strict;
# Erika Phelps
# Sept. 21, 2009
# Exercise 5.1

# Write a nonhalting program.

# Define variables
my $var = 'DNA is COOL';
my $constant = '1';

# Create the while loop to be neverending...
    while($constant = '1'){
        print "$var!\n";
}

exit;