A_single_file_wiki_wifky2.png

[hack] ¢ؿβλ

[Add this entry to hatena bookmark]

Perl 4 εǽַ֡פȤäơ ܥơ֥̾ȴؿб񤭴ޤ

㤨Сϥեʬ˲ɽɲä뤿ʤɤˡ ϥեɽؿ򲣼ꤹˤϡ ץ饰ǡΤ褦ʥɤ񤭤ޤ

package wifky::myplugin;

  (*::print_form        , *wifky::myplugin::org_print_form )
= (*wifky::myplugin::my_print_form , *::print_form         ) ;

sub my_print_form{
   my @argv=@_;
   # ɲäν
   # 

   # ꥸʥϥեʬɽ
   &wifky::myplugin::org_print_form(@argv);
}

뤳Ȥˤꡢ桼δؿ(&wifky::myplugin::my_print_form) ꥸʥϥեؿ(&::print_form)Ⱥؤ뤳ȤǤޤ ΰǡεؿΤϡ &wifky::myplugin::org_print_form Ȥ̾ǥХååפƤޤ ˤꡢؿɬ׺Ǿ¤ʽ¹Ԥ ϡؿǤȤȤǽˤʤäƤޤ

ʤߤˡ֤ϡؿ̾ǤʤƱ̾ѿ̾ 碌ƺäƤޤޤΤǡĤƤ (äȤ⡢ХѿƱ̾δؿϤޤʤȻפޤ)

|

Designed for @nifty.