Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

Re: export variable outside foreach

by Anonymous Monk
on Jun 19, 2014 at 08:29 UTC ( #1090418=note: print w/replies, xml ) Need Help??

in reply to export variable outside foreach

sure it does ... if $last is empty then @fields was empty or @lines is empty

Replies are listed 'Best First'.
Re^2: export variable outside foreach
by mitchreward (Acolyte) on Jun 19, 2014 at 08:34 UTC

    perl -w

    Global symbol "$scre" requires explicit package name at line 12.

    Execution of aborted due to compilation errors.
      Is that a question? :D Fix your typo, copy the varible name, ctrl+f, paste variable name, enter, find the typo, fix it


      He meant that $srce is not the same as $scre.


      When your only tool is a hammer, all problems look like your thumb.

Re^2: export variable outside foreach
by Eily (Prior) on Jun 19, 2014 at 08:43 UTC

    @lines being empty seems unlikely, since it was grepped out of the file. @fields may not contain four fields though (Edit: whoops, @lines, can be empty, is just can't contain empty strings unless $string1 is empty)

    mitchreward, have a look at Data::Dumper. If you use Data::Dumper; and then add print Dumper \@fields; to your loop you may have more information on what is happening.

    Edit: the code you provided does compile, so you have removed the error by changing it.

      @lines being empty seems unlikely, since it was grepped out of the file.

      I don't understand this point. Why would grep-ing the contents of the file make it likely that the  @lines array must contain something? (Or does this refer to a previous version of the posted code that was changed without citation?)

        My bad, I read "@lines is empty" correctly, but understood "@lines contains empty strings" :).

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1090418]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (8)
As of 2018-06-25 10:30 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.