#!/usr/local/bin/perl

$counter=0;

for ($counter = 0; $counter < 10; $counter++) {
print $counter, " ";
}