Change open OUT to this
and perl will tell youopen(OUT, "/tmp/$sh".".sysedge.sh") or die "Can't open /tmp/$sh.sysedg +e.sh: $!\n";
Update: kudos to wjc75019 for spotting his error without my help;-) But the or die is still good advice
In reply to Re: print() on closed filehandle OUT at B.p line 19, <SH> line 1732.
by hipowls
in thread print() on closed filehandle OUT at B.p line 19, <SH> line 1732.
by wcj75019
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |