... annotation and dna variables are declared as a list and are assigned the values of match variables 1 and 2 after a successful match.

Note that it's also possible to "capture the captures" to lexicals and die on match failure in a single statement:

c:\@Work\Perl\monks>perl -wMstrict -le "for my $record (qw(eks---wye eks---wyyye)) { my ($x, $y) = $record =~ m{ \A (eks) .* (wye) \z }xms or die qq{malformed record '$record'}; ;; print qq{record '$record': got '$x' '$y'}; } " record 'eks---wye': got 'eks' 'wye' malformed record 'eks---wyyye' at -e line 1.
I prefer this practice because it's all too possible, believe me, to insert just one more pattern match test between the original capturing statement and the separate statement intended to assign its capture variables  $1 $2 ... to lexicals, in which case the original capture groups sometimes, but not always, and perhaps quite silently (gotta love this bug!), become invalid.


Give a man a fish:  <%-{-{-{-<


In reply to Re^2: Error Unitialized value and use by AnomalousMonk
in thread Error Unitialized value and use by tryingnottofailmytes

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.