Difference between revisions of "Exercise 5.1"
Jump to navigation
Jump to search
Line 3: | Line 3: | ||
<b>Exercise 5.1 in <i>Beginning Perl for Bioinformatics</i></b> | <b>Exercise 5.1 in <i>Beginning Perl for Bioinformatics</i></b> | ||
<br><br> | <br><br> | ||
− | < | + | <code>#!/usr/bin/perl -w |
− | use strict;</ | + | use strict;</nowiki> |
− | |||
#Erika Phelps | #Erika Phelps | ||
#Sept. 21, 2009 | #Sept. 21, 2009 | ||
− | #Exercise 5.1 | + | #Exercise 5.1 |
− | + | ||
#Write a nonhalting program. | #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"; | ||
− | } | + | } |
exit; | exit; |
Revision as of 14:23, 22 September 2009
Return to Week 2
Exercise 5.1 in Beginning Perl for Bioinformatics
#!/usr/bin/perl -w
use strict;</nowiki>
- 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;