Regexp::Assemble
こんな感じになるらしい。
use Regexp::Assemble; my $re = Regexp::Assemble->new; $ra->add( 'ab+c' ); $ra->add( 'ab+-' ); $ra->add( 'a\w\d+' ); $ra->add( 'a\d+' ); print $ra->re; # prints a(?:\w?\d+|b+[-c])
うーん。大量に自動処理とか?
http://search.cpan.org/~dland/Regexp-Assemble-0.28/Assemble.pm
Spreadsheet::ParseExcel
なんかこう、あれだなあ。
Spreadsheet::ParseExcel makes you to get information from Excel95, Excel97, Excel2000 file.
バージョンかひょっとして。
http://search.cpan.org/~kwitknr/Spreadsheet-ParseExcel-0.2603/ParseExcel.pm