view release on metacpan or search on metacpan
Tutorial.pdf view on Meta::CPAN
xÚÌXÍoÇBÕzia 0bäK.¿Xø@ZªÂíÉm;ôì®h¶
|m
B{í!þqáCPÄm®Í©D·R@$DíôÍÌòc)S]Ë9T2h=î{3¿÷{oÞ¼·7sZ¹àÃR±ÊÁo±ZD#AõE]~¥£BIü3[ÖÀ,_>À,{)*ZÕA¹¶kÖiÔf¶ë£ÍNfÙö®Ø5ã+Rëënêå3k?_Ì^ª =§Ì2yCÕ\äRdb ¿Içc ³ÝA¶[wëx20aluA2b4ºhj*Ò
Ͷ(ZIlRÐ
22Û·7JMâújâv¸È³[ãc...
CNª$M/C9R§ìXºj51]J7)]Jû(]º®UQ))r2ö9$Ø&d?Rb¤8¥Fõt^Urɽº½Ú³¼*WzÜ+ôtàKzrðR71x©=¼QQàóqðQe²DI
B7ྡྷ(TÚáµeðêµÚÕëWj¯Ä3[(ªÕÕr<F>9R71R{ùª¢ ðLñ¼ÔM^jϯçxãÙã÷ã«×~tþõxü064PyhZ5i´ÙñääHÝÄHíªº¢¤ø,ñ,TÁ+ݤàö,ðå¼_¦GTÈÕÅB©Ü©Ø©}ÔxbD~\K:p¸÷YºD¶O^¢36£¦§iÙìjè<t5Ã.E&/LhÍETKèb}ÙT=êÃb½QÔÎ...
tå¼}Ìdl/N"¬¸aÑÀ
¨·£sH[ñMF.Èîá(Vw´ÅÂa32²=-¼MñL4D´Ç÷ááâÁ9ÙÐfòzTßÏ-¿´Z[½øÒúãvjvK½¦¶8RéñReáÀä7²/òÂ(D;t4D"x>tE'<¯>$G¦Ç¹e}³Ó³|3ÒOìÚDvÃ&z;aåË×äHÙsË|R¢peò'öJ!òNf³Ì×ä<"O¯ó
ùÿòïÉÃ|KMâTCIôa9
|{¸÷ §T£
õBÑìÀÊdÚâIEA´¯cÛÄ...
Åì
ÕWj¯-òpnîyýôxonai,}Â÷ÿ=ñíý é>K»÷ÿ¸rj$=¼\^íÌóû½ß¹q÷ÏBz87÷ÍÞ֣߯<
¿¿À?罿ö¶Þ?:|ûÞÜw8ÿ¢w÷ö{ _qþiïÁàT[ü)¥.|é+¡¹nóÍ}c`Êg/·vq¿¿+
Z
¿üîAÿwKi~«ðÞsÎ?
ôvkï·¿Ïû[BZlmÿ¾¿ûïqþ ÷|¸õøíþ½þqï6¿òÅýÛ;Þ½¹ù{#~ë_ü³%¾3wªÇß ÃÇüÀ©çz<¼:øôhfÃp¿»¥XâwÂû\Jã7÷C<ó¶9¤ßÍ_þ"cÑWö¾l|ÚwEiÞéï,ôvÿ¤¤...
äÿÿs
á2P0PIÑ0Ö3ÑS(ÊÌ/Ê,ÉL-ÖÉâ254ȸ®!\\ð4 endstream
endobj
Tutorial.pdf view on Meta::CPAN
0
JKR¢¬DRlYvx¨ãF
zw¸;$'ÚzgWÖFNAO¾6
¡½öCÿ¸ð!(â6×äT"[©J ¢8yo\kÉ|óñæýÞû½ß,ogÙÀGæÀ/Cÿfæg`.7>ÒpVeaúýÎð¥uÜÁÁøÛÒW20gLÃz ÏâÞu+N
©1G'`Ì¥Ra|±óª
ÔKUæÆ`t2
ñÆ×ßÎÀd6ÓÙIßô[H??=>Ñ<¿É-ÇQfbSõ«ú|óõ̰¸¸DgÕ&¼¡ðS=ÆOð®O_Ì({uy¿Ç~ÿ[P&sMnÛ,Û6ÖYÄomª[ìôÿ O²Ê]Ù.-±¾1¸l/¸ØéÓÁýÛ¡êùæ¹LÎW}á0J BÁM2úWOñ.Ã"ÈIB¾õdeWå¾fAr:j·vÙK7Îæ¤c»XÖÖ/®¯.@ÄìÅ¥d÷...
5îCèJ¬´dä4G?Õâês\î37HÊÀÅ0à¬W0ê«#Ùeµ"jBeA±ÌÄ*Í$×DPñÂ/4+Pã5=ÇëÑefÑS§éÙÌ)uÂr8¨±NOͺV3Æ´+¡<Gü"¦þq´xà^xbÔ^©Ä} ÷8øÔ¾8%o¢Í!]ÂRâ,}.ÆÅ·°ÏGÖZÆZEÊë>KsÓpq$`Â6:9BZGWýELamvÚîÄÒÛй(»è£©p»Ü¦ÖP
muÒ/...
:1]=,8RU©ã3=§(¨HwÎT¡À³]Há<l¸Þ
xè|õ±1!Ö\Ë
óAjêjÄ4Τ°ëúÒePöY÷ḛ́ÞTîP÷U"¸Ór! ¹êÈ|òø!î!û&
¹-Ïݼ*ϬÙ[·î
PóBõmr¢ÅMÀHÈt?ã `À%ì8ipMyĵ&Ä¢J¦
xô´ïÁ^}ÑÅqb¨P¥/V~ÂêEB¾GFÔÀ¸"Ô`TöIÖDJå¹v]+¿¬§ð¶lü8qô?¢~Õ«$[W_Ë->ó©âZ´Bs0OЩ$ÍøæB8Óqñ»Å£*ùetfÆ
¸ØMz_r5'»*»î~d ¶@Ðÿ¨MôµxæN1(dÔ©;N\òB×IýD¾...
äÿÿs
á2P0PIÑ0Õ3ÖSp.-.ÉÏͬJ,ÉÌÏÓÉâ254H¸®!\\q/:$endstream
endobj
363 0 obj
2075
view all matches for this distribution
view release on metacpan or search on metacpan
my_perl_eval_sv(command, TRUE);
SvREFCNT_dec(command);
*match_list = perl_get_av("array", FALSE);
num_matches = av_len(*match_list) + 1; /** assume $[ is 0 **/
return num_matches;
}
main (int argc, char **argv, char **env)
view all matches for this distribution
view release on metacpan or search on metacpan
# If we had to re-execute with $CONFIG_SHELL, we're ensured to have
# already done that, so ensure we don't try to do so again and fall
# in an infinite loop. This has already happened in practice.
_as_can_reexec=no; export _as_can_reexec
# Don't try to exec as it changes $[0], causing all sort of problems
# (the dirname of $[0] is not the place where we might find the
# original and so on. Autoconf is especially sensitive to this).
. "./$as_me.lineno"
# Exit status is that of the last command.
exit
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FFI/Platypus/Lang/Pascal.pm view on Meta::CPAN
{
extract_symbols($libpath,
export => sub {
my($symbol1, $symbol2) = @_;
return if $symbol1 =~ /^THREADVARLIST_/;
return unless $symbol1 =~ /^[A-Z0-9_]+(\$[A-Z0-9_]+)*(\$\$[A-Z0-9_]+)?$/;
my $symbol = $symbol1;
my $ret = '';
$ret = $1 if $symbol =~ s/\$\$([A-Z_]+)$//;
my($name, @args) = split /\$/, $symbol;
$symbol = "${name}(" . join(',', @args) . ')';
view all matches for this distribution
view release on metacpan or search on metacpan
deps/libffi/aclocal.m4 view on Meta::CPAN
AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl
AC_REQUIRE_AUX_FILE([compile])dnl
# FIXME: we rely on the cache variable name because
# there is no other way.
set dummy $CC
am_cc=`echo $[2] | sed ['s/[^a-zA-Z0-9_]/_/g;s/^[0-9]/_/']`
eval am_t=\$ac_cv_prog_cc_${am_cc}_c_o
if test "$am_t" != yes; then
# Losing compiler, so override with the script.
# FIXME: It is wrong to rewrite CC.
# But if we don't then we get into trouble of one sort or another.
deps/libffi/aclocal.m4 view on Meta::CPAN
if (
am_has_slept=no
for am_try in 1 2; do
echo "timestamp, slept: $am_has_slept" > conftest.file
set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null`
if test "$[*]" = "X"; then
# -L didn't work.
set X `ls -t "$srcdir/configure" conftest.file`
fi
if test "$[*]" != "X $srcdir/configure conftest.file" \
&& test "$[*]" != "X conftest.file $srcdir/configure"; then
# If neither matched, then we have a broken ls. This can happen
# if, for instance, CONFIG_SHELL is bash and it inherits a
# broken ls alias from the environment. This has actually
# happened. Such a system could not be considered "sane".
AC_MSG_ERROR([ls -t appears to fail. Make sure there is not a broken
alias in your environment])
fi
if test "$[2]" = conftest.file || test $am_try -eq 2; then
break
fi
# Just in case.
sleep 1
am_has_slept=yes
done
test "$[2]" = conftest.file
)
then
# Ok.
:
else
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Farabi/files/public/assets/codemirror/mode/markdown/markdown.js view on Meta::CPAN
state.linkTitle = false;
var matchCh = ch;
if (ch === '(') {
matchCh = ')';
}
matchCh = (matchCh+'').replace(/([.?*+^$[\]\\(){}|-])/g, "\\$1");
var regex = '^\\s*(?:[^' + matchCh + '\\\\]+|\\\\\\\\|\\\\.)' + matchCh;
if (stream.match(new RegExp(regex), true)) {
return linkhref;
}
}
lib/Farabi/files/public/assets/codemirror/mode/markdown/markdown.js view on Meta::CPAN
var savedInlineRE = [];
function inlineRE(endChar) {
if (!savedInlineRE[endChar]) {
// Escape endChar for RegExp (taken from http://stackoverflow.com/a/494122/526741)
endChar = (endChar+'').replace(/([.?*+^$[\]\\(){}|-])/g, "\\$1");
// Match any non-endChar, escaped character, as well as the closing
// endChar.
savedInlineRE[endChar] = new RegExp('^(?:[^\\\\]|\\\\.)*?(' + endChar + ')');
}
return savedInlineRE[endChar];
view all matches for this distribution
view release on metacpan or search on metacpan
CHUNK:
while (length($self->{inbuf}) > 0) {
# In the middle of a tag?
if ($self->{intag}) {
# Look for the stuff key
if ((my $i = index($self->{inbuf}, KEY)) != $[-1) {
if (substr($self->{inbuf}, $i+KEYLEN, 1) eq 'X') {
# If there's an X at the end, it's literal
substr($self->{inbuf}, $i+KEYLEN, 1) = "";
} else {
# Otherwise, we've got a complete waveform/expr/whatever
if ($rbuf =~ s/^(WV|LP|ER|OK)\n$//s) {
$tag = $1;
last if $tag eq 'OK' or $tag eq 'ER';
}
if ((my $i = index($rbuf, KEY)) != $[-1) {
if (substr($rbuf, $i+KEYLEN, 1) eq 'X') {
substr($rbuf, $i+KEYLEN, 1) = "";
} else {
$rest = substr($rbuf, $i+KEYLEN);
substr($rbuf, $i) = "";
view all matches for this distribution
view release on metacpan or search on metacpan
lib/File/Basename/Object.pm view on Meta::CPAN
return $old_path;
}
sub suffixlist {
my($self, @suffixes) = @_;
my @old_suffixes = @{$self}[$[ + 1 .. $#$self];
splice(@$self, $[ + 1, $#$self, @suffixes) if(@_ > 1);
return @old_suffixes;
}
sub no_suffixes {
my $self = shift;
lib/File/Basename/Object.pm view on Meta::CPAN
sub _compare_basename {
my($a, $b) = @_;
if(UNIVERSAL::isa($b, __PACKAGE__)) {
return scalar($a->fileparse) cmp scalar($b->fileparse);
} else {
return $a->_compare_basename(__PACKAGE__->new($b, @{$a}[ $[ + 1 .. $#$a ]));
}
}
__END__
view all matches for this distribution