j2ee_zhongqi的专栏

[b]Perl函数中若要传递一个数组，可以通过引用来传递更方便：[/b]如果在参数中传递两个数组的时候，会出现一些问题。sub test{ my(@a,@b) = @_;}@array_1 = qw(a b c);@array_2 = qw(d e f);test(@array_1, @array_2);上面这段代码我们是想把@array_1 会赋值给@a，@...

Perl数组变量和列表用法指南(1)http://developer.51cto.com/art/201007/212207.htmPerl数组变量和列表用法指南(2)http://developer.51cto.com/art/201007/212207_1.htmPerl文件句柄概念详解http://developer.51cto.com/art/201007/211594...

[code="java"]#!/usr/bin/perl -w ################################################################################################## Author: George Feng added on Sep 13th# Usage: This script is ...

1.读取excel： [code="java"]use strict; use Spreadsheet::ParseExcel; my $parser = Spreadsheet::ParseExcel->new(); my $workbook = $parser->Parse('Book1.xls'); for my $workshe...

[size=large]1.去前导空格[/size]s/^\s+//[size=large]2.去尾部空格[/size]s/\s+$//[size=large]3.去前后部空格[/size]s/^\s+|\s+$//g[size=large]3.举例[/size][code="java"]my $str=~s/^\s+|\s+$//g;[/code]...

在用perl循环读写excle的行时，发行如果遇到空行也要循环好多次，本来想在perl中解决这个问题，可是没有找到较好的处理方法，就找到了一个怎么在excle中删除空行的方法:[b]“定位”法[/b]表格编辑完毕，当需要批理删除其中的空行时，依次点击菜单栏的“编辑/定位”，在弹出的“定位”对话框中单击“定位条件”按钮。在接着弹出的“定位条件”对话框中点选“空值”单选按项（如图1），...

[b]基本用法[/b][code="java"]# 初始化 %h为空数组%h = {};# 用数组初始化%h为 a=>1, b=>2%h = ('a', 1, 'b', 2);# 意义同上，只是另一种更形象化的写法。%h = ('a'=>1, 'b'=>2);#如果key是字符串，可以省略引号。下面这行和上面那行是一样的%h = (a=>1, b=>2);...

当我运行下面的脚本的时候，报错“Protocol scheme 'http' is not supported,_rc==>501”.[code="java"]##!/bin/sh# Source needed files. /home/citminst/sqllib/db2profileexec /opt/freeware/bin/perl5.8.8 -x $0 ...

perl 需要访问https,脚本如下，目前环境是perl 5.8.8,aix 6.1，Crypt::SSLeay 是0.58，OpenSSL 是0.9.8：[code="java"]##!/bin/sh# Source needed filesexec /opt/freeware/bin/perl5.8.8 -x $0 $@#!perl#line 9use str...