in reply to conditional enable use bytes for a whole module at compiletime?
BEGIN { $Y::VERSION = 0.1 } { package X; use if ( $Y::VERSION < 1 ), "bytes"; sub l { return length shift } } no bytes; print X::l( chr 3456 ); __output__ 3
_________
broquaint
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: conditional enable use bytes for a whole module at compiletime?
by borisz (Canon) on Nov 19, 2004 at 16:03 UTC |