Help for this page
$ perl -MO=Concise -e 'print <>' 7 <@> leave[t1] vKP/REFC ->(end) 1 <0> enter ->2 ... 3 <0> pushmark s ->4 5 <1> readline[t1] lK/1 ->6 4 <$> gv(*ARGV) s ->5 *ARGV
package SafeReadline; require Exporter; @ISA = 'Exporter'; ... $pkg->export("CORE::GLOBAL", $sym, @_); } sub readline { ... }
www.com | www.net | www.org
No recent polls found