view release on metacpan or  search on metacpan

lib/Earabic.pm  view on Meta::CPAN

    # split regexp
    my @char = $string =~ /\G((?>
        [^\\\$\@\[\(] |
        \\                               (?>[1-9][0-9]*)            |
        \\g (?>\s*)                      (?>[1-9][0-9]*)            |
        \\g (?>\s*) \{ (?>\s*)           (?>[1-9][0-9]*) (?>\s*) \} |
        \\g (?>\s*) \{ (?>\s*) - (?>\s*) (?>[1-9][0-9]*) (?>\s*) \} |
        \\x                              (?>[0-9A-Fa-f]{1,2})       |
        \\                               (?>[0-7]{2,3})             |
        \\c                              [\x40-\x5F]                |
        \\x\{                            (?>[0-9A-Fa-f]+)        \} |
        \\o\{                            (?>[0-7]+)              \} |

lib/Earabic.pm  view on Meta::CPAN

        # \0 --> \0
        elsif ($char[$i] =~ /\A \\ (?>\s*) 0 \z/oxms) {
        }

        # \g{N}, \g{-N}

        # P.108 Using Simple Patterns
        # in Chapter 7: In the World of Regular Expressions
        # of ISBN 978-0-596-52010-6 Learning Perl, Fifth Edition

        # P.221 Capturing
        # in Chapter 5: Pattern Matching
        # of ISBN 978-0-596-00492-7 Programming Perl 4th Edition.

        # \g{-1}, \g{-2}, \g{-3} --> \g{-1}, \g{-2}, \g{-3}
        elsif ($char[$i] =~ /\A \\g (?>\s*) \{ (?>\s*) - (?>\s*) ((?>[1-9][0-9]*)) (?>\s*) \} \z/oxms) {
        }

        # \g{1}, \g{2}, \g{3} --> \g{2}, \g{3}, \g{4} (only when multibyte anchoring is enable)
        elsif ($char[$i] =~ /\A \\g (?>\s*) \{ (?>\s*) ((?>[1-9][0-9]*)) (?>\s*) \} \z/oxms) {
        }

        # \g1, \g2, \g3 --> \g2, \g3, \g4 (only when multibyte anchoring is enable)
        elsif ($char[$i] =~ /\A \\g (?>\s*) ((?>[1-9][0-9]*)) \z/oxms) {
        }

        # \1, \2, \3 --> \2, \3, \4 (only when multibyte anchoring is enable)
        elsif ($char[$i] =~ /\A \\ (?>\s*) ((?>[1-9][0-9]*)) \z/oxms) {
        }

 view release on metacpan or  search on metacpan

data/miffy-moved.4  view on Meta::CPAN

&ÁKú0lrPËÓ«ešÞCÝ–(ôãd•ÂæI+}¹ÑPùúµe·‘6rö£dîtŠ|¥îÑƼAí¸/k$J`Ç®u"VwYPmûSÍÍ®bV+n_{ŠG 4ò_‹~§ŠŠÒ|ëΟÀexWº“É¥í‹w˜:†äÎó@ TuîóòëîÅ_K£‚6å¥uÑíCH
œ1TWÐû
p1[_á·{ÿ¸æÚBûû¾ï®Êº>U«Éên­³
ŸC_ƒ
u™1¤ “[6Š%ž`êšõËï/ÛpÍÙY§YÞ6-¥]ö}Àù¦æ	²Pªj—ÑÞ;Ïk ¦;
¦:JÉçMï^“…r1–óp˜ÄÆJ}íGzî#u²^ÚjUzKû
ß‘Š«&XzŒƒ¹ ªÜdp»X«Q¸{ÕéÔöeXÞfŠ¶6ŠÈrâû¶N1¤Mp:û'msHQùoE÷Zçý¤áwƒü¹õ“Ÿ)Œ °ž¬ƒ+â—X磻UùaØ©D—{ŠüÙŠŽ5Ž¨Ž¢Q˜Ì¾ò¹/Í@ÞÙ#¿ËÅ°OÚ¸"g›”-Âç~öìQ>yÞ‡Éôa5ÂÖ½l 5aS%·acá®D4ëB*\g›'õŸœ6Ôm3‘EAðáb’}ø]ÓN?R+)»ìÏ”ÏÛ+­ïÀ¬Y²ÃRñmë5çw·…ÂÏ
¬Ð Uñ
|m"ºL«=b§ìIµ„XÉ›	–¸Ðár@’fÝ<wm²£6ù¤¿ÎßÙjè”–*
Ân¾#ÖŠ—³ÓlO¦CXžâ˜‰^՝ȓI»­Õpö,KѺØåj$o…Ô†ÛÂT–žŒO—ÝÉé±t³d½J©±tÛ/¥{w¾›W£'o@#=ú=øùÕ¿%¶àñLØ_úT¡GiH˜zÖ1AkÝ͹˜oÐôj ýYKa°x µªªÝr¿2š²êzÑÈ×ÔŽirþgä÷n¨ab7Ç­A‡‚Ó_h3Y>±×œ’*@{=+•h...
d-i뤊J°SJh‡´u.NIZU¥ÅòHòMØ6cÏu¥z¦÷Õö½Ñ‡;‘¸M[S!7?T˜÷Í3Ä´ëQ¡©|=„YÅ#ÓSVçÂËë}úr׺8<’=Õèá„}ƒ4af¯`cÒ_RÙâ
.É;.˜G›5gM‡[okû
ÿøn

 view release on metacpan or  search on metacpan

unzip-6.0/win32/vc6/funzip.dsp  view on Meta::CPAN

SOURCE=..\..\funzip.c
# End Source File
# Begin Source File

SOURCE=..\..\globals.c
# End Source File
# Begin Source File

SOURCE=..\..\inflate.c
# End Source File

unzip-6.0/win32/vc6/funzip.dsp  view on Meta::CPAN

SOURCE=..\..\crypt.h
# End Source File
# Begin Source File

SOURCE=..\..\globals.h
# End Source File
# Begin Source File

SOURCE=..\..\inflate.h
# End Source File

 view release on metacpan or  search on metacpan

cpt/differential_comoving_volume.pl  view on Meta::CPAN

# plot the graph
my $win = PDL::Graphics::PGPLOT::Window->new();

$win->env( log10(0.03), log10(100), log10(0.001), log10(20), 0, 30 );
$win->label_axes( "redshift z",
		  "comoving volume derivative H\\d0\\u\\u3\\d dV/(dzd\\gW)", 
		  "Fig 6 of Carroll, Press & Turner ARAA 1992 vol 30, 499-542" );

$win->hold;

$win->line( $lz, $lv_a, { LINESTYLE => 'solid' } );

 view release on metacpan or  search on metacpan

data/phvavn1.pco  view on Meta::CPAN

YPLOT  3
LOC  0 0.100000001 1 0.389999986
LAB  1 LI  0 100 LS 2 JUS Lef
LAB  1 POS 0.00100000005 0 " "
LAB  X  channel energy (keV)
LAB  Y  \gx
R    X2 0.204400003 2.97839999
R    Y2 -38.7472076 23.7156715
WIN  ALL
LOG  X ON 1 2
LOG  Y ON 1