
perl编程
文章平均质量分 66
scrub
这个作者很懒,什么都没留下…
展开
-
basic i/o of perl socket
writer:demonalex email:demonalex_at_dark2s.org 使用PERL SOCKET API首先需要载入SOCKET模块。 use Socket; ====================================================================== socket(文件句柄,AF_INET,数据类型,协议类型); #建立套接原创 2004-10-31 16:00:00 · 1068 阅读 · 0 评论 -
认识win强大的管理工具——WMI(脚本篇)
文章作者:勇敢的风 [E.S.T顾问团] feng.cnblog.com.cn信息来源:邪恶八进制安全小组 www.eviloctal.com好长时间没有写东西了,由于本人的文笔不怎么好,所以大家不要笑我。以下内容均为自己理解的,如有错误之处还请大家指出。我的技术面很窄,所以以下内容中的代码均为ASP+VBScript。正文:------------------------------------原创 2005-06-27 22:22:00 · 1437 阅读 · 1 评论 -
PERL内置变量表
从网上搜索总结的PERL内置变量,可以在程序中引用 $- 当前页可打印的行数,属于Perl格式系统的一部分 $! 根据上下文内容返回错误号或者错误串 $" 列表分隔符 $# 打印数字时默认的数字输出格式 $$ Perl解释器的进程ID $% 当前输出通道的当前页号 $& 与上个格式匹配的字符串 $( 当前进程的组ID $) 当前进程的有效组ID $* 设置1表示处理多行格式.现在多以/s和/m原创 2004-12-11 11:34:00 · 863 阅读 · 0 评论 -
Perl程序设计中常用的函数
引用:Perl程序设计中常用的函数 指令:# 说明:注示符号Remark宣告 示例:#这是一个注示说明 指令:print 语法:print Filehandle LIST 说明:这个Filehandle可以看作在I(INPUT)/O(OUTPUT)之间的一个桥梁,可以利用FILEHANDLE来做出数据读入写 出的动作.STDIN是代表从哪连输入数据,例如从电脑的原创 2004-11-28 14:12:00 · 887 阅读 · 0 评论 -
Perl的文件操作(2)(适合初学者)
读入多个记录 如果你调用,返回文件中剩余的记录。如果你处于文件尾,则返回空表: @records = ; if (@records) { print "There were ", scalar(@records), " records read.n"; } 在下面的一步中,进行赋值和测试两项工作: if (@records = ) { print "There were ", scalar(原创 2004-11-19 20:23:00 · 804 阅读 · 0 评论 -
perl常用函数(适合初学者)!
指令:print语法:print Filehandle LIST说明:这个Filehandle可以看作在I(INPUT)/O(OUTPUT)之间的一个桥梁,可以利用FILEHANDLE来做出数据读入写 出的动作.STDIN是代表从哪连输入数据,例如从电脑的键盘输入;STDOUT是代表从哪连输出数据;例如从电脑的屏 幕输出;STDERR是代表从哪连输出错误的数据,例如从电脑的屏幕输出.而在PERL语原创 2004-11-19 20:21:00 · 795 阅读 · 0 评论 -
Perl的文件操作(1)(适合初学者)
用 Sysopen()进行更多的控制 -------------------------------------------------------------------------------- 为了更好的控制文件的打开方式,可以使用 sysopen() 函数: use Fcntl; sysopen(FH, $filename, O_RDWR|O_CREAT, 0666) or die原创 2004-11-19 20:22:00 · 739 阅读 · 0 评论 -
perl的特殊变量[转帖]
让你的perl代码看起来更像perl代码,而不是像C或者BASIC代码,最好的办法就是去了解perl的内置变量。perl可以通过这些内置变量可以控制程序运行时的诸多方面。 本文中,我们一起领略一下众多内置变量在文件的输入输出控制上的出色表现。 行计数 我决定写这篇文章的一个原因就是,当我发现很多人都不知道“$.”内置变量的存在,这的确让我很吃惊。 我依然能看到很多人是这样写代码的: 代码 my $原创 2004-11-05 17:20:00 · 1023 阅读 · 1 评论 -
Perl打造溯雪拙劣仿制品
use Curl::easy;$ok=1;$username="shitusername";#欲解用户名open(DICT,"password.txt");#字典档while ($passwdtemp= and $ok!=0) {# if ($passwdtemp=) {# die "no password remain";# $passwdtemp=;chomp($passwdtemp);pri原创 2004-11-11 16:32:00 · 906 阅读 · 0 评论 -
IO::Socket简介
[Perl文]IO::Socket简介 writer:demonalex email:demonalex_at_hackermail.com 另一个构造socket库,使用对象构造模式。如果您看过wawa老大的动网EXPLOIT与isno大哥的WEBDAVX,您就 会发现这些EXPLOITS都是使用这个库做的,所以如果您想写EXPLOITS的话,不妨看看此文。 以前我写的是传统的C语言‘遗留’下了原创 2004-10-31 16:01:00 · 1704 阅读 · 1 评论 -
原来ASP可以读写注册表
一个例子:Set ReadComputerName=CreateObject("WScript.Shell") Dim ComputerName,RegPath RegPath="HKLM/System/CurrentControlSet/Control/ComputerName/ComputerName/ComputerName" ComputerName=ReadComputerName.Re原创 2005-04-13 14:31:00 · 777 阅读 · 0 评论