your code is working when the user inputs the name correctly the first time , but if he gives a wrong name the first time , so i am doing this
while (!-e $filename) { print "-*-*--*-*--*-*--*-*--*-*--*-*--*-*--*-*--*-*--*-*--*- +*--*-*--*-*--*-*--*-*--*-*--*-*--*-*-\n"; print STDERR "\n$filename not found. \n Ensure that you have + given the correct file name\n and the file exists in the working dir +ectory \n."; print "Re-enter filename, or q to quit: "; $filename = <STDIN>; chomp $filename; # my @filenam = split ('\.', $filename); exit() if $filename eq "q"; }
the line commented out by me is what I did so everytime user inputs the file name it should get updated but its not happening , can you tell me why
In reply to Re^2: giving same name to two files
by Anonymous Monk
in thread giving same name to two files
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |