> use Socket;が使えないとは･･･(;´Д`)

use the::Force qw(Luke);

参考：2003/12/04(木)01時25分20秒