#!/usr/bin/perl -w
use strict;

for (1..9) {
  print $_/10, "\n";
}