#!/usr/bin/perl -w
# genrun.pl modified by ifedayo oladapo 17.07.2009
use Term::Size;
use FileHandle;
use Text::Tabs;
use strict;
STDOUT->autoflush(1);
if ($#ARGV < 2){
print "\nfatal error...