#!C:/perl/bin

for (1..10)
{
 print "$_ pas!n";
}