Exercise 5.1: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
| (4 intermediate revisions by the same user not shown) | |||
| Line 1: | Line 1: | ||
Return to [[Week 2]] | Return to [[Week 2]] | ||
Exercise 5.1 in <i>Beginning Perl for Bioinformatics</i></b> | |||
< | <pre> | ||
#!/usr/bin/perl -w | |||
use strict; | |||
use strict; | # Erika Phelps | ||
# Sept. 21, 2009 | |||
#Erika Phelps | # Exercise 5.1 | ||
#Sept. 21, 2009 | |||
#Exercise 5.1 | |||
#Define variables | # Write a nonhalting program. | ||
# Define variables | |||
my $var = 'DNA is COOL'; | my $var = 'DNA is COOL'; | ||
my $constant = '1'; | my $constant = '1'; | ||
#Create the while loop to be neverending... | # Create the while loop to be neverending... | ||
while($constant = '1'){ | while($constant = '1'){ | ||
print "$var!\n"; | print "$var!\n"; | ||
} | } | ||
exit; | exit; | ||
</pre> | |||
Latest revision as of 22:54, 22 September 2009
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;