今天明月在chinaunix论坛看到有人问用perl的DBI如何获取oracle的建表语句，直接用desc不能成功。想起几年前明月有个代码也遇到过这个问题，就总结如下：
第一种方法：
#数据库数据类型对应关系
my %sql_type = (
分类: oracle, perl
标签:
这个挺有意思的。地址是: http://segmentfault.com/game/
其他就不多写了。
第10关明月写了个脚本：
#!/usr/bin/perl
use MIME::Base64;
open F ,">a.tar.gz&qu[......]继续阅读
分类: perl
标签: 光棍节程序员闯关
之前遇到过这样一个问题：
需求：
想要实现这么一个功能，现有一个字符串文件，比如说是有abcdefghijklmn，另外有一个文件是这样的信息：
5 e
7 &nbs[……]
继续阅读
分类: perl
标签: pack p用法, perl, 内存占用, 变量物理地址
下面例子演示地址直接的关系。
use Devel::Peek;
my $mem = "abc";
my $a=pack( 'P', $mem );
print \$mem."\n";[......]继续阅读
分类: perl
标签: 地址操作
进制转换：\x{100},\d{12} …大小写: "\LASDFA"
非ASCII字符判断
perl -i.bk -pe 's/[^[:ascii:]]//g;' file
perl 执行树
perl -MO=Ter[……]
继续阅读
分类: perl
标签: Debugging, 大小写转换, 执行树, 操作符, 文件测试符, 运算符, 进制转换
DBI获取oracle建表语句【原创】