I cannot get PERL to succuessfully "unlink" a file.  From the shell, it
works:

shell/iX> ls -l /AUTOMATC/PUB/spool/O44698
-rw-rw-rw-   1 MGR.NETBASE       AUTOMATC    2048 Sep 21 11:48
/AUTOMATC/PUB/spo
ol/O44698
shell/iX> rm /AUTOMATC/PUB/spool/O44698
shell/iX> ls -l /AUTOMATC/PUB/spool/O44698
ls: File or directory "/AUTOMATC/PUB/spool/O44698" is not found
shell/iX>

From PERL, I get:

Cannot delete file (/AUTOMATC/PUB/spool/O44424) (System call error) at
/AUDIT/A
TO/basicio.pl line 133, <INPUT> line 42.

My PERL code looks like:

    unlink "$spooldir/$mfile" or die "Cannot delete file ($spooldir/$mfile)
($!)";

Now, if I do something like:

    unlink "/AUTOMATC/PUB/spool/O44424" or die "Cannot delete file
($spooldir/$mfile) ($!)";

IT WORKS!  Why not with variables?


Duane "The Question Man" Larkin

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *