#!/usr/bin/perl -w

use strict;

our @data = ("a1","a2","a3","a4","a5","a6","a7","a8","a9","a0");

foreach (@data)
{
    print "$_\n";
}

exit;