view release on metacpan or  search on metacpan

script/rsybak  view on Meta::CPAN

#
#(?<NUM>
#    (
#     -?
#     (?: 0 | [1-9][0-9]* )
#     (?: \. [0-9]+ )?
#     (?: [eE] [-+]? [0-9]+ )?
#    )
#)
#
#(?<VAR> \$[A-Za-z_][A-Za-z0-9_]{0,63})
#
#(?<STR_SINGLE>
#    (
#     '
#     (?:
#         [^\\']+
#       |
#         \\ ['\\]
#       |
#         \\