… | |
… | |
23 | =cut |
23 | =cut |
24 | |
24 | |
25 | package Convert::Scalar; |
25 | package Convert::Scalar; |
26 | |
26 | |
27 | BEGIN { |
27 | BEGIN { |
28 | $VERSION = 0.08; |
28 | $VERSION = 0.09; |
29 | @ISA = qw(Exporter); |
29 | @ISA = qw(Exporter); |
30 | @EXPORT_OK = qw(weaken unmagic grow); |
30 | @EXPORT_OK = qw(weaken unmagic grow); |
31 | %EXPORT_TAGS = ( |
31 | %EXPORT_TAGS = ( |
32 | taint => [qw(taint untaint tainted)], |
32 | taint => [qw(taint untaint tainted)], |
33 | utf8 => [qw(utf8 utf8_on utf8_off utf8_valid utf8_upgrade utf8_downgrade utf8_encode utf8_decode utf8_length)], |
33 | utf8 => [qw(utf8 utf8_on utf8_off utf8_valid utf8_upgrade utf8_downgrade utf8_encode utf8_decode utf8_length)], |