Kazuhiro Osawa > dan > dan

Download:
dan-0.551.2.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.551.2   Source  

NAME ^

dan - The literal unread

SYNOPSIS ^

  use dan;
  print "foo"; # not displaying
  no dan;
  print "foo"; # foo

  use dan the => 'Blogger';
  print Dan the 'Blogger';

it is possible to solve it with force though there are utf8 pragma and no compatibility.

  use utf8;
  use dan force => 1;
  print "foo"; # not displaying
  no dan;
  print "foo"; # foo

DESCRIPTION ^

dan is not Dan Kogai. dan the unread to literal strings.

it is a present for perl 20 years old and 5.10 release commemoration.

OPTIONS ^

cat_decode
  use dan cat_decode => sub {
      my $str = shift;
      $str =~ s/Jcode/Encode/;
      $str;
  };
  print "Jcode";# Encode

or

  use utf8;
  use dan force => 1, cat_decode => sub {
      my $str = shift;
      $str =~ s/Jcode/Encode/;
      $str;
  };
  print "Jcode";# Encode
force
  use utf8;
  use dan force => 1;
  print "foo"; # not displaying
the
  use dan the => 'Blogger';
  print Dan the 'Blogger';

AUTHOR ^

Kazuhiro Osawa <ko@yappo.ne.jp>

LICENSE ^

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: