==
y eq
?
ok
?
is
?
$@
?
like
?
$#-
? ¿Y $+
?
(Consulte 3.1.4)
use_ok
es llamada dentro de un BEGIN
?
SKIP
?
TODO
?
pod_file_ok
?
¿A que módulo pertenece?
tr
?
tr
?
d
de tr
?
(consulte 3.5)
DB<1> $a = '"Focho \"mucha\" chufa"' DB<2> print $a "Focho \"mucha\" chufa" DB<3> print $& if $a =~ m{^"([^"]|\\")*"} "Focho \" DB<4> print $& if $a =~ m{^"(\\"||[^"])*"} "Focho \"mucha\" chufa"
a = 2-3
, ¿Que devolverá su analizador léxico?
¿Devuelve ID PUN NUM NUM
o bien ID PUN NUM PUN NUM
?
(hemos simplificado el flujo eliminando los atributos).
use Test::More qw(no_plan);
?
can_ok
? ¿Qué argumentos tiene?
DB<1> $a='4+5' DB<2> print "($&) " while ($a =~ m/(\G\d+)/gc) or ($a =~ m/(\G\+)/gc); (4) (+) (5) DB<3> $a='4+5' # inicializamos la posición de búsqueda DB<4> print "($&) " while ($a =~ m/(\G\d+)/g) or ($a =~ m/(\G\+)/g); (4) DB<5> $a='4+5' DB<6> print "($&) " while ($a =~ m/\G\d+|\G\+/g) (4) (+) (5)
is_deeply
e is
?
throws_ok
?
¿En que módulo se encuentra?
HARNESS_PERL_SWITCHES=-MDevel::Cover make test
?
perl -d:DProf programa
? ¿Para que sirve?