-
用perl实现守护进程(daemon)代码
所属栏目：[大数据] 日期：2020-12-16 热度：173
? 有时候需要用perl实现一个服务程序,即linux常说的守护程序(daemon)，而我们往往希望这样的程序能够在后台运行。有些人一般是直接用bg命令把程序放到了后台，但感觉不尽人意。这里提供一个标准的守护进程的代码： #!/usr/bin/env perl use strict; use warn[详细]
-
Nikto
所属栏目：[大数据] 日期：2020-12-16 热度：199
Nikto 转载请注明，原文转自?http://www.voidcn.com/article/p-yrszhyiu-uh.html 一 简介 Nikto 是一款开放源代码的、功能强大的WEB扫描评估软件，能对web服务器多种安全项目进行测试的扫描软件，去寻找已知有名的漏洞，能在230多种服务器上扫描出 2600多种[详细]
-
Perl脚本：列出目录下所有的文件扩展名（后缀名）
所属栏目：[大数据] 日期：2020-12-16 热度：161
? #!/bin/perl # Extension_filename_lister v0.1 # List all extension filenames without duplicate in a directory. use strict; use warnings; use File::Find; my %extname_list; sub process_file { ??? my $cur_file = $_;? ??? # Ignore the directo[详细]
-
PLEAC-Perl 教程 - Date and Time (Perl进阶者极力推荐)
所属栏目：[大数据] 日期：2020-12-16 热度：197
[root@localhost perl]# perl t.pl $VAR1 = '2011093011:33:05'; $VAR1 = '5'; $VAR2 = '09'; $VAR3 = '30'; $VAR4 = '11'; $VAR5 = '33'; $VAR6 = '05'; $VAR7 = '2011'; [root@localhost perl]# cat t.pl #!/usr/bin/perl use strict; use Data::Dumper; u[详细]
-
perl学习总结之引用
所属栏目：[大数据] 日期：2020-12-16 热度：60
创建引用 创建规则1：在数组或者哈希前加反斜杠 ??? $aref = @array;???????? # $aref now holds a reference to @array ??? $href = %hash;????????? # $href now holds a reference to %hash ??? 当引用被储存在变量里，就可以如普通变量般使用。 创建规[详细]
-
perl学习总结之引用
所属栏目：[大数据] 日期：2020-12-16 热度：74
创建引用 创建规则1：在数组或者哈希前加反斜杠 ??? $aref = @array;???????? # $aref now holds a reference to @array ??? $href = %hash;????????? # $href now holds a reference to %hash ??? 当引用被储存在变量里，就可以如普通变量般使用。 创建规[详细]
-
perl引用的实例
所属栏目：[大数据] 日期：2020-12-16 热度：76
$ cat country Chicago,USA Frankfurt,Germany Berlin,Germany Washington,USA Helsinki,Finland New York,USA ? #!/usr/bin/perl?-w? use?strict;? my?% table ;? my?($city,$country);? while?()?{? ?chomp;? ?my?($city,$country)?=?split?/,/;? ?push?@{[详细]
-
perl引用的实例
所属栏目：[大数据] 日期：2020-12-16 热度：153
$ cat country Chicago,USA Frankfurt,Germany Berlin,Germany Washington,USA Helsinki,Finland New York,USA ? #!/usr/bin/perl?-w? use?strict;? my?% table ;? my?($city,$country);? while?()?{? ?chomp;? ?my?($city,$country)?=?split?/,/;? ?push?@{[详细]
-
Perl、PHP、ASP、JSP技术比较
所属栏目：[大数据] 日期：2020-12-16 热度：121
本文将对目前最常用的四种动态网页语言Perl（Practical Extraction and Report Language）、PHP（Hypertext Preprocessor）、ASP（Active Server Pages）、JSP（JavaServer Pages）进行一些技术性的比较。 Perl Perl（Practical Extraction and Report Langu[详细]
-
Poison Ivy 2.3.0 免杀的几点思路
所属栏目：[大数据] 日期：2020-12-16 热度：143
? 文章作者：mika[EST] 今天在国外的IRC里看到有几个老外在讨论PI2.3的免杀，由于PI2.3的对齐方式跟过去的不太一样导致使用加壳程序处理后不能正常运行，所以它的免杀成了大家关注的对象了。于是乎俺下载了一个试了试，加过壳后的确不能运行了。可是由于PI2.[详细]
-
Local Stack Overflow（Basic Module）
所属栏目：[大数据] 日期：2020-12-16 热度：168
Local Stack Overflow (Basic Module) ???????????????????????Gotfault Security Community ????????????????????????????????? (GSC) ? ? ---------[ Chapter : 0x100???????????????????????????????????????????? ? ] ---------[ Subject : Introduction[详细]
-
Local Stack Overflow（Advanced Module）
所属栏目：[大数据] 日期：2020-12-16 热度：96
Local Stack Overflow (Advanced Module) ? ---------[ Chapter : 0x200????????????????????????????????????????????????????????? ? ] ---------[ Subject : Local Stack Overflow (AdvcancedModule)??? ] ---------[ Author?: xgc/dx A.K.A Thyago Silva[详细]
-
Perl、PHP、ASP、JSP技术比较
所属栏目：[大数据] 日期：2020-12-16 热度：95
本文将对目前最常用的四种动态网页语言Perl（Practical Extraction and Report Language）、PHP（Hypertext Preprocessor）、ASP（Active Server Pages）、JSP（JavaServer Pages）进行一些技术性的比较。 Perl Perl（Practical Extraction and Report Langu[详细]
-
perl自动ftp的方法（Linux版本,Net::FTP）
所属栏目：[大数据] 日期：2020-12-16 热度：171
在很多情况下，我们需要从远处服务器上下载当天或者昨天生成的日志文件，来查看一些我们需要的东西或者备份。 ??? 如果采用了ftp，那么我们应该建立自动化的ftp方式，来方便我们的工作，下面我们将使用perl语言编写的，当然也可以用shell。 ??? 利用了perl的[详细]
-
Perl脚本：递归替换目录下所有源文件中指定字符串
所属栏目：[大数据] 日期：2020-12-16 热度：110
如需要将目录dir1下的所有源文件中的单词static和inline删除，则建立文件 string.txt： static inline 再运行: $?perl ./replace_string dir1 ? replace_string的内容如下： #!/bin/perl # This script is to replace strings specified in a file with blan[详细]
-
一个按照包含字符串为条件搜索文件的perl程序
所属栏目：[大数据] 日期：2020-12-16 热度：184
#! perl -wuse File::Find;if ($#ARGV != 0) {print "Invalid Usage:n";print "Usage: perl browse_string.pl strn";exit;}$searchStr = shift @ARGV;@files = (); @directories_to_search = (".");find(wanted,@directories_to_search);foreach $file (@[详细]
-
perl DBI
所属栏目：[大数据] 日期：2020-12-16 热度：54
如果结果集很大，对程序会有什么影响？ ? http://blog.csdn.net/like_zhz/article/details/5441946 ? ? perl DBI 学习总结 2010-04-01 16:09 768人阅读 评论(0) 收藏 举报 perl DBI 学习总结 ? DBI和DBD的不同关系模型： ##################################[详细]
-
FindBin模块在文件嵌套时的返回值
所属栏目：[大数据] 日期：2020-12-16 热度：154
转自：http://www.zebraol.com/?p=35 我们知道，Perl的FindBin模块可以取得当前正在运行的Perl脚本的文件路径以及文件名。 可是，如果多个文件嵌套调用呢，例如文件A调用文件B，那么B中的FindBin返回的脚本名称应该是B还是A呢？ 这里做一个试验，详述如下：[详细]
-
perl脚本练习（一）
所属栏目：[大数据] 日期：2020-12-16 热度：157
操作系统为Ubuntu10， #!/usr/bin/perl use strict; use warnings; print "Hello,World...n"; my $riqi=`date +%d`; print "today is $riqin"; my @shang=qw( 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 ); my @xia=16..31; if ($riqi eq "01") { ????[详细]
-
Perl to get http page with LWP NTLM authentication
所属栏目：[大数据] 日期：2020-12-16 热度：184
1. Make sure the correct Authen::NTLM module written byMark Bush?installed. 2. Make sure the module named MIME::base64 LWP::Authen::Negotiate installed. You can run:?perl -e 'print join "n",@INC' to know perl modules located and check if[详细]
-
perl的数据类型
所属栏目：[大数据] 日期：2020-12-16 热度：169
概括、perl有两种基本数据类型，标量类型和复数类型。 标量类型 ??????????????? |-----双精度浮点数 ??????????????? |-----字符串类型 ??????????????? |-----引用类型 复数类型 ??????????????? |-----数组 ??????????????? |-----散列表 函数类型 （函数[详细]
-
把perl的hash结构放入数组/堆栈/队列的方法
所属栏目：[大数据] 日期：2020-12-16 热度：85
perl里没有内置的结构体，所以就需要用hash数组来模拟。 比如想定义一个含有name和address的结构，那么申请一个含有key是name和address的hash数组就可以了。 但是我在试图将这个结构放入队列时，却会出现问题，Thread::queue或者将内置的数组作为队列使用都[详细]
-
Perl开发: SIG{INT}理解
所属栏目：[大数据] 日期：2020-12-16 热度：73
中断信号 的handle函数可能在执行的过程中被进一步的中断，如果这个handle函数执行过程比较长。并且会recursively调用之前的中断Handle函数。所以最保险的做法是在handle函数声明内部的SIG函数。参考的demo code$int = 0;$SIG{INT} = sub { $int = 1; $SIG{I[详细]
-
Perl 与 Python 之间的一些异同
所属栏目：[大数据] 日期：2020-12-16 热度：112
关于 Perl 与 Python 的起源和特点 Perl 是 Practical Extraction and Report Language 的简称，由 1987 年 Larry Wall 创建，最初的目的是为了在 UNIX 上方便处理报表，经过长期的发展已经成为一种全功能的程序设计语言，当前最新的版本为 Perl5.14.1，Perl[详细]
-
perl encrypt
所属栏目：[大数据] 日期：2020-12-16 热度：109
?require 5.002 ; use strict; use warnings; use vars qw($XOR $BLOCKSIZE $HEADERSIZE $CRYPT_MAGIC_1 $CRYPT_MAGIC_2 ???? $size $mode $line $Fingerprint $file $block ??? ) ; $XOR? ?= 'Perl' ; $BLOCKSIZE?????? = length $XOR ; $HEADERSIZE????? =[详细]
