print 'type your path [c:\data\toload.txt]: ';
chomp (my $inputFile = <STDIN>);
$inputFile ||= 'c:\data\toload.txt';