http://qs321.pair.com?node_id=1176812


in reply to Re: Grab input from the user and Open the file
in thread Grab input from the user and Open the file

my ($theFile);
until (-f $theFile) {
  print "Please enter the file name:";
  chomp($theFile = <STDIN>);
}

[download]
But God demonstrates His own love toward us, in that while we were yet sinners, Christ died for us. Romans 5:8 (NASB)

In Section Seekers of Perl Wisdom