Select Code to Download

Select or download this

    Warning (line 27): Found an error marker (<error>) after an uncond
+itional
                       <error>
...
                       to use <error?> instead?)

       ERROR (line 1): Invalid startOfRecord: Was expecting RECORDSTAR
+T

Select or download this

Variable "$errortext" is not available at c:/progs/perl5100/site/lib/P
+arse/RecDescent.pm line 2917.
Variable "$errorprefix" is not available at c:/progs/perl5100/site/lib
+/Parse/RecDescent.pm line 2917.
...
Use of uninitialized value $errortext in formline at c:/progs/perl5100
+/site/lib/Parse/RecDescent.pm line 2850.
Use of uninitialized value $errortext in formline at c:/progs/perl5100
+/site/lib/Parse/RecDescent.pm line 2852.
                     :

Select or download this

    Warning (line 27): Found an error marker (<error>) after an uncond
+itional
                       <error>
...
                       to use <error?> instead?)

       ERROR (line 1): Invalid startOfRecord: Was expecting RECORDSTAR
+T

Select or download this

    (W closure) During compilation, an inner named subroutine or eval 
+is
    attempting to capture an outer lexical that is not currently avail
+able.
...

    Here, when the '$a' in the eval is being compiled, f() is not curr
+ently being
    executed, so its $a is not available for capture.