Difference between revisions of "Exercise 5.1"
Jump to navigation
Jump to search
(New page: Return to Week 2 <b>Exercise 5.1 in <i>Beginning Perl for Bioinformatics</i></b> <br><br> <nowiki>#!/usr/bin/perl -w use strict;</nowiki> #Erika Phelps #Sept. 21, 2009 #Exercise 5.1 ...) |
|||
| (7 intermediate revisions by 2 users 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 | ||
| + | # Exercise 5.1 | ||
| − | # | + | # Write a nonhalting program. |
| − | |||
| − | |||
| − | + | # Define variables | |
| − | |||
| − | #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"; | ||
| Line 22: | Line 21: | ||
exit; | exit; | ||
| + | </pre> | ||
Latest revision as of 17: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;
