Perl4.操作行/列