> Yeah, Tony your sturcture worked fine... except....
>
> system "tar cvf ./test.tar *.grib"
> if ($? == 0) {
> print "\nSuccess!\n";
> }
> else {
> print "\nUnsuccessful!\n";
> }
Perl programmers are lazy, and don't use things like '== 0' almost 100% of the time.
The
following should work better:
if ($?) {
...
}
else {
...
}
It is obvious that in the sucessful case $? is not set to 0. If it still doesn't
work, just print
the value of $? and see what you get.
Jonathan Paton
__________________________________________________
Do You Yahoo!?
Everything you'll ever need on one web page
from News and Sport to Email and Music Charts
http://uk.my.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
