November 12, 2009 指鹿為馬 Perl 版 - gugod's blog Edit Delete Tags Autopost #!/usr/bin/env perl use strict; use warnings; use utf8; use encoding 'utf8'; sub 馬 { "馬函式" }; # 指鹿為馬 *鹿 = *馬; print 鹿(), "\n"; via gugod.org