Lines Matching refs:message
43 my ($message, $pos) = @_;
44 $@ = bless { error=>$message, pos=>$pos }, "Text::Balanced::ErrorMsg";
49 my ($wantarray, $textref, $message, $pos) = @_;
50 _failmsg $message, $pos if $message;
1786 This is the message.
1791 would correctly return the string "<<'EOMSG'\nThis is the message.\nEOMSG",
1802 "<<'EOMSG'\nThis is the message.\nEOMSG\n" (i.e. the full extracted here document,
1823 "This is the message.\n" (i.e. the text of the here document),
1846 This is the message.
2159 Printing C<$@> directly produces the error message, with the offset appended.