eval not work

[ngoc]

Hi
My eval do not work. I do not know why?
eval {
system "rename _new.xml .xml *.xml";
};
die 'Can not change new to current data' if $@;

when no xml file exists. It should come to exception situation and print
out 'Can not change new to current data' and exit program. But it
print out the message 'No such file and directory' and go ahead to next
step.

Thanks
ngoc

 

[A. Sinan Unur]

My eval do not work. I do not know why?
eval {
system "rename _new.xml .xml *.xml";
};
die 'Can not change new to current data' if $@;

when no xml file exists. It should come to exception situation and print
out 'Can not change new to current data' and exit program. But it
print out the message 'No such file and directory' and go ahead to next
step.

You are jumping to conclusions. eval works perfectly.

You just failed to read the documentation for system

perldoc -f system

Sinan