Ate :: Scalar :: Sticky :: Scalar :: Sticky es un módulo Perl con asignaciones de bloques a escalares.
Descargar ahora

Ate :: Scalar :: Sticky Clasificación y resumen

Ate :: Scalar :: Sticky Etiquetas

cuadra Módulo perl escalares Asignaciones de bloqueo Asignaciones de escalares

Ate :: Scalar :: Sticky Descripción

TIE :: SCALAR :: Sticky es un módulo Perl con asignaciones de bloques a escalares. ETIQUE :: SCALAR :: Sticky es un módulo PERL con asignaciones de bloques a escalares.Synopsis. Use estricto; Use lazo :: Scalar :: Sticky; Ate My $ Sticky, 'Tie :: Scalar :: Sticky'; $ Sticky = 42; $ Sticky = ''; # todavía 42 $ Sticky = UNDEF; # sigue siendo 42 $ sticky = 0; # ahora es cero corbata mis $ pegajosa, 'Tie :: Scalar :: Sticky' => QW / Foo Bar /; $ Sticky = 42; $ Sticky = 'foo'; # sigue siendo 42 $ Sticky = 'Bar'; # sigue siendo 42 $ sticky = 0; # Ahora es que los ceroscalars vinculan a este módulo "rechazarán" las asignaciones de undef o la cadena vacía o cualquiera de los arugmentos adicionales proporcionados para atar (). Simplemente elimina la necesidad de que usted valida las tareas, como: $ var = $ val a menos que GREP $ VAL EQ $ _, QW (no uno de estos); en realidad, esa es la idea exacta utilizada en este módulo ... así que ¿Por qué hacer esto? Debido a que recientemente tuve que hacer un bucle a través de una lista donde algunos artículos no estaban definidos y se debe usar el valor definido anteriormente. En pocas palabras: ate My $ Sticky, 'Tie :: Scalar :: Sticky' => 9, 'String'; Para (3, Undef, 'String', 2, '', 1,9,0) {$ Sticky = $ _; Imprimir $ Sticky, ''; } Debe imprimir: 33 22 10 Requisitos: · Perl

Ate :: Scalar :: Sticky Software relacionado