perl benchmark

benchmark
Devel::DProf
Bundle::Devel
Devel::Trace
Devel::SmallProf

[討論] Perl6 好像出來了

The Long Perl 6 Super-Feature List
http://www.perlfoundation.org/perl6/index.cgi?the_long_perl_6_super_feature_list

What Is Perl 6
http://www.perl.com/pub/a/2006/01/12/what_is_perl_6.html

http://dev.perl.org/perl6/

Perl 6 Users FAQ
http://perl.net.au/wiki/Perl_6_Users_FAQ

Cultured Perl: Perl 6 grammars and regular expressions
http://www-128.ibm.com/developerworks/linux/library/l-cpregex.html?ca=dgr-lnxw01Perl6Gram

Parrot

Parrot is a virtual machine

http://www.parrotcode.org/

Changing the working directory

In the shell you would type "cd /home" to change the workingdirectory to /home. You could write the following in your Perl script:

system("cd /home");

But it would have no effect. In fact, since the system call forksfrom the process used by the interpreter, it doesn't change the workingdirectory of your script. Instead, you can use a Perl function called"chdir":

chdir "/home";

http://www.linuxforums.org/programming/learn_perl_in_10_easy_lessons__lesson_5.html

perlcompile

perlcompile
http://perldoc.perl.org/perlcompile.html

Encode::HanExtra

update Encode::HanExtra

split.pl
open(CCCII, "/home/laxendion/tools/UNI_CI_V3.txt");
open(NEW,"> /home/laxendion/tools/UNI.txt");

foreach (){
($Uni,$Cii,$other) = split (/,/,$_);
$Uni =~ /(\d)(\w)(\w)(\w)(\w)/g;
if ($1 == 0){
$Uni = "";
$Cii =~ s/(\w\w)(\w\w)(\w\w)/\\x$1\\x$2\\x$3/g;
$other = "|0";
print NEW "$Uni $Cii $other\n";
}
elsif ($1 == 2){
$Uni = "";
$Cii =~ s/(\w\w)(\w\w)(\w\w)/\\x$1\\x$2\\x$3/g;
$other = "|0";
print NEW "$Uni $Cii $other\n";
}
}
close(CCCII);
close(NEW);

send to 唐鳳
cccii.ucm
http://kohataiwan.googlegroups.com/web/cccii.ucm

perlvar 特殊變數

http://linux.die.net/man/1/perlvar

man perlvar