#!/usr/bin/perl -w
use strict;
print "count $_\n" for (0..9);