Difference between revisions of "Exercise 5.1"
Jump to navigation
Jump to search
| (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 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;
