trying to write simple script to put lines into error msgs

code:
1 # progam to place line numbers in all error messages
2 use strict;
3
4 my @this = qx(ls *pl); #adjust this to grab your programs
5 my $die = qq!dienice("!; #string starting die message
6
7 foreach my $file (@this) {
8 chomp $file;
9 open(SCRIPT, '$file') || die "$file DIE DIE DIE!!!!! $!";
10
11 my $line_num = 0;
12 my $test = 0;
13
14 my @newfile = <SCRIPT>;
15 close SCRIPT;
16
17 foreach my $line ( @newfile ) {
18 $line_num++;
19 if ( $line =~ m/$die/ ) {
20 $line =~ s/$die\d+\b/$die$line_num /i;
21 $test = 1;
22 }
23
24 open(NEW, '>$file') || die "DIE DIE DIE!!!!! $!";
25 print NEW "@newfile";
26 close NEW;
27 }
28 }

getting 'delete_tmp.pl DIE DIE DIE!!!!! No such file or directory at fixLines line 9'

when ls gives:

./ delete_tmp.pl* frontpage.pl* index.pl* update_tmp.pl*
../ fixLines include.pl* rep_req.pl*

In reply to 'no such file' when it's there. by jptxs

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.