#!/usr/bin/perl -w
#require 'mylib.pl';
print "\n\n", "\@INC is :\n";
for (@INC){print "$_\n";}; 
BEGIN{
unshift @INC, "/usr/local/lib/perl5/site_perl/5.8.4/i686-linux";
unshift @INC, "/usr/local/lib/perl5/site_perl/5.8.4/i686-linux/auto";
}
use strict;
use Convert::IBM390 qw();
#use Convert::IBM390 qw(:all);
#my @in =<>;
#print eb2asc(@in);