首页 软件列表

首页

perl push的用法及子程序返回值的反思

2020-02-16 标签:perl,push,用法,子程序,返回,值的,反思,pop,操作,数组,元素,取出,array,fred,得到,现在

pop 操作将数组的最后一个元素取出并返回: @array=5..9; $fred=pop(@array); #$fred 得到 9,@array 现在为(5,6,7,8) $barney=pop@array; #$barneygets8,@array 现在为(5,6,7) pop@array; #

首页

perl子程序的运用及子程序中变量私有(my)声明的重要性

2020-02-16 标签:perl,子程序,运用,变量,私有,声明,重要性,转换,程序,简单,dna,序列,a,转变成,t,情况,使用,实现

一个转换程序,简单的把DNA序列中的A转变成T,第一种情况没有使用私有变量。实现代码如下:#!/bin/perl#下面是一段DNA序列$DNA=ATTATATAT;#这里是我们的序列$result=A_to_T($DNA);print "I changed all $DNA A to T, and

首页

perl的格式化输出及chomp的重要性分析

2020-02-16 标签:perl,格式化,输出,chomp,重要性,分析,实现,代码,如下,bin,perlprint,please,input,lines,press,ctrl,z,n,s

实现代码如下:#!/bin/perlprint "please input some lines,then press Ctrl+Z. \n";chomp(@s=);print "1234567890"x 3 ."\n";#做为输出结果的一个标尺foreach $s(@s){printf "%20s

首页

perl高级排序,<=>操作符,飞船操作符

2020-02-16 标签:perl,高级,排序,amp,lt,gt,操作,飞船,按照,要求,进行,实现,代码,如下,bin,n,umber,qw

按照要求进行的排序:实现代码如下:#!/bin/perl@number=qw/5 10 15 3 2 4 8 6 /;my @descending =sort {$a$b} @number;#这里$a=5,$b=10,因为$a在前,perl得到的结果是小数在前,也就是升序排列print "@desc

首页

perl从文件中读取数据并输出的实现代码

2020-02-16 标签:perl,文件,读取,数据,输出,实现,代码,window,某个,格式,open,filehand,路径,e,g,d,data,txt,打开

window下读取某个文件,格式是:open (filehand,"路径e.g:d:\\data.txt");然后将打开的内容赋值给一个变量:$protein=;附:一个读取蛋白质序列的程序。实现代码如下:#!/bin/perlopen (PROTEINFILE,"f:\\perl\\data.tx

首页

perl处理csv文件的小例子

2020-02-16 标签:perl,处理,csv,文件,例子,实现,代码,如下,usr,bin,use,strict,open,file,c,bx,users,books

实现代码如下:#!/usr/bin/perl#use strict;open(FILE1,"C:/Perl/BX/BX-Users.csv");open(FILE2,"C:/Perl/BX/BX-Books.csv");open(FILE3,"C:/Perl/BX/BX-Book-Ratings.c

首页

Perl 字符串处理备忘录

2020-02-16 标签:perl,字符串,处理,备忘录,chop,chomp,函数,都以,作为,参数,去除,末尾,一个字,区别,无论,是什么,都会

1. chop和chomp函数 两个函数都以字符串作为参数,并去除其末尾最后一个字符。区别是,无论最后一个字符是什么,chop都会去除,并在返回值中返回;而仅当字符串最后一个字符与特殊变量$/保存的字符一样时,chomp才会将其去除。默认情况下$/保存换行字符,当然可以重设。  1)如果函数参数是一

首页

Perl学习基本备忘录

2020-02-16 标签:perl,学习,基本,备忘录,数组,初始化,array,stringa,stringb,stringc,使用,索引,循环,检索,print,输出

1.Perl数组(1):1) 初始化数组 @array = ( "stringA" , "stringB" , "stringC" );2) 使用负索引循环检索 print $array[-1];#输出索引为(-1 + 3) % 3 = 2 的 stringC3) 动态增长 $array[4] =

首页

perl用变量做句柄介绍

2020-02-16 标签:perl,变量,句柄,介绍,实现,代码,如下,usr,bin,wuse,strict,use,warnings,filehandle,fh,array,10,open

实现代码如下:#!/usr/bin/perl -wuse strict;use warnings;use FileHandle;my %fh;my @array = (1..10);for(1..5){open $fh{$_},">$_.txt" or die;}for(1..5){#prin

首页

通过perl实现一个简单的NIDS

2020-02-16 标签:通过,perl,实现,简单,nids,随着,网络,安全,需求,深入,开发,基于,入侵,检测,技术,重要,且有,意思,研究,方向

随着对网络安全需求的深入开发,基于网络的入侵检测技术已经成为一个重要且有意思的研究方向。想学习NIDS技术除了去读一些现成的资料和一些开源系统的源码,最好的办法莫过于自己去写一个NIDS程序,只有那样才能真正体会到一些NIDS的实现需求和设计妙处。本质上说NIDS只是一种网络流量的分析工具,通过对网