#!/usr/bin/perl -w
use strict;
use Math::BigInt;


my@array=("A.."Z","a".."z","0".."9");
foreach(@array){
	print $_."\n";
}
#my $big=Math::BigInt->new(