Exercise 5.3D

Return to Week 2
Exercise 5.3 in Beginning Perl for Bioinformatics

#!/usr/bin/perl -w

use strict; 
 

#Damian Almiron

#Ex5-3 

#Pseudocode: 

# write a program that prints all the numbers from 1 to 100.  

#my variables 

my $count = 0; 

#Initialize the loop 

until ($count = 100) { 

    $count++; 

    print "$count\n";

} 

exit;