10 2013 档案
摘要:Learning Java the O'Reilly's Way (Part I)Java 技术可以说是越来越重要了,不但可以用在计算机上,甚至连电视等家电用品,行动电话、个人数字助理(PDA)等电子产品,以及智能卡都可以透过 Java 的技术来为人们创造更便利的生活。许多人因此对 Java 感兴趣,想好好学习 Java。因为讲授 Java 课程的关系,这几年来,不少人问我:怎样才能学好 Java,我给他们的建议很简单 ---『多读 Java 的好书,可以有系统又轻易地获得许多高手的经验』。其实,我说的也是我自己的经验。『那么,要看什么书呢?』我知道你会这么问。毕竟书店里 Ja
阅读全文
摘要:我的第一个用于生产环境的perl脚本,虽然不是很优秀,但也迈出了扎实的一步 :)领导有任务,给一批IP列表,ping每一台机器,如果没有响应就发邮件通知,通知的邮件需要分开,不能通知一个列表,得一封一封的通知.用到email::send模块,因为需要用到Gmail复制代码代码如下:#!/usr/bin/perluse warnings;use strict;use Email::Send;use Email::Send::Gmail;use Email::Simple::Creator;my @list = qw/1.1.1.12.2.2.23.3.3.3/;foreach my $re (@
阅读全文
摘要:这个perl文件将执行的任务是, 按照指定的文件夹目录,自动将该文件夹下的所有文件上传到指定ftp站点的指定目录下本应用程序设计的几个基本理念是:工具箱再利用:尽可能利用已有的工具;简化运行步骤;不引入过多的业务逻辑,满足的需求越简单越好。所以,我们定义了本应用程序依赖于以下几个工具的运行:ActivePerl-5.8.4.810-MSWin32-x86Upload.plUpload.config我们将主要的执行逻辑都放在Perl源文件Upload.pl中了,配置文件为Upload.config。这个perl文件将执行的任务是, 按照指定的文件夹目录,自动将该文件夹下的所有文件上传到指定ftp
阅读全文
摘要:perl特殊符号及默认的内部变量,有需要的朋友不妨参考下Perl的特殊符号@ 数组$x{} x名字前面是美元符号($),后面是花括号({}),则其为 hash 元素% 要引用整个 hash,使用百分号(“ )作为前缀。前面几页中使用的 hash 的名字为%family_name。$! 系统产生的一些可读的信息,也可能是出错的信息$_ 子函数参数变量自己本身@_ 子程序的私有变量&x 调用子函数x 数据输入.如果没有指定文件名,则其从标准输入流中自动打开和关闭一系列文件进行读入Perl默认的内部变量$- 当前页可打印的行数,属于Perl格式系统的一部分$! 根据上下文内容返回错误号或者错
阅读全文
摘要:perl,后来我又改过了增加了一些交互和数据库检测的功能。主要用于收集ip、mac、姓名、房间,后来又加入了维修记录的功能。服务器端接受数据并存入数据库中。代码如下:主要用于收集ip、mac、姓名、房间,后来又加入了维修记录的功能。服务器端接受数据并存入数据库中。#############################usestrict;useTk;useEncode;#SOCKE参数my$PF_INET=2;my$port=2345;my$remote_addr=pack('SnC4x8',$PF_INET,$port,192,168,138,228);my$SOCK_DG
阅读全文
摘要:默认状态下,很显然都是用\n来区分行,\n也被我们称作为换行符。当读取序列时,按行来读取时,就是以换行符为标准。读取的strawberry1.gb的文件内容如下:LOCUSJX118024460bpDNAlinearPLN25-SEP-2012DEFINITIONFragariavescasubsp.americanaRNApolymerasebetasubunit(rpoC1)gene,partialcds;plastid./ACCESSIONJX118024//VERSIONJX118024.1GI:402238751KEYWORDS.how///SOURCEplastidFragaria
阅读全文
摘要:perl中尖括号运算符的用途分享,这里简单介绍下,方便需要的朋友 perl中运算符可以有如下的用途:1)如果尖括号中间是文件句柄,尖括号运算符允许你读取文件句柄,比如。2) 如果尖括号中间是搜索模式,尖括号运算符能返回与该模式匹配的文件列表,这称为一个glob,比如。3)一组尖括号运算符如果中间没有任何东西,那么它可以读取命令行上所有文件的内容;如果没有给出文件名,则可以读取标准输出。请看下面这段代码:代码如下: while(){ print $_; }如果将上面的程序保存为Example.pl,那么用下面这个命令行运行该程序:代码如下: #perl –w Example.pl file1 f
阅读全文
摘要:写好了perl程序,运行后,准备等待结果输出时,结果双击后,看到屏幕闪了一下,然后什么都没有了,根本没有机会然你看到输出的结果 当你刚开始学习perl的时候,写好了程序,准备兴高采烈的等待结果输出时,结果双击后,看到屏幕闪了一下,然后什么都没有了。根本没有机会然你看到输出的结果。怎么解决这种问题呢?其实各种语言都有这个问题!解决的思路就是让程序输出结果以后,继续等待用户的输出就可以了也就是在脚本的末端加上这样的两行代码如下:print "press to continue...";;这样就可以了。详细出处参考:http://www.jb51.net/article/3499
阅读全文

浙公网安备 33010602011771号