Statement Perl

#!/usr/local/bin/perl 
for ($count=1; $count <= 5; $count++) { 
   print ("$count\n"); 
}