原创 @ARGV:perl命令行參數
當perl腳本運行時，從命令行上傳遞給它的參數存儲在內建數組@ARGV中，@ARGV是PERL默認用來接收參數的數組，可以有多個參數，$ARGV[0]是表示接收到的第一個參數，$ARGV[1]表示第二個。 使用方法爲： perl
2020-05-31 04:34:21
5
原创 關於perl和shell的參數傳遞
Perl 1.命令行參數傳遞 *Perl **@ARGV $_ARGV[0] $#ARGV爲參數的個數-1 ($#array 只適用於@array不適用%hash) *Shell $1 $2 參數個數$#(不用減1,是否可以
2020-05-31 04:34:21
原创 Net::SSH::Perl 安裝問題解決
使用perl -MCPAN -e 'install Net::SSH::Perl',時會卡到這： Math::BigInt: couldn’t load specified math lib(s), fallback to Math::
2020-05-31 04:34:21
1
原创 在perl中執行shell命令
在perl的模塊庫中有一個Shell.pm可以很方便地執行shell命令. use Shell qw(cat ps cp);$passwd = cat('</etc/passwd');@pslines = ps('-ww'),cp("/e
2019-07-18 13:30:03
原创 Centos下測試硬盤讀寫速度
這是在服務器上，讀寫超快。 寫速度 $dd if=/dev/zero bs=1k count=1000000 of=1Gb.file 1000000+0 records in 1000000+0 records out 102400
2019-07-18 13:30:03
原创 shell腳本:一次讀取文件的一行，並輸出
寫法一: #!/bin/bash while read line do echo $line #這裏可根據實際用途變化 done < urfile 寫法二: #!/bin/bash cat urfile
2019-07-18 13:30:03
原创 防止ssh暴力破解
#!/bin/bsah /sbin/iptables -F badip=`cat /var/log/secure |grep "Failed"|grep -Eo '([0-9]+\.){3}[0-9]+'|sort -n|uniq -
2019-02-22 21:18:10
原创 Java自學之路
一:學會選擇 爲了就業，不少同學參加各種各樣的培訓。 決心做軟件的，大多數人選的是java，或是.net， 也有一些選擇了手機、嵌入式、遊戲、3G、測試等。 那麼究竟應該選擇什麼方向呢？ 我的意見是，不要太過相信
2019-02-22 21:18:00
原创 mysql 主從備份
主服務器： /etc/my.cnf ----------------------------------------------------------------- [mysqld] datadir=/var/lib/mysql soc
2019-02-22 21:18:00
原创 我的友情鏈接
王乾De技術Blog[愛生活，愛學習]yangming.comangerfire-宋楊【兆隆人】綜合佈線工作組星辰小屋-佘佳棟-小風博客石頭之光小五的博客千山島主之微軟技術空間站Linux is a Perfect System 虛擬的現實
2019-02-22 21:18:00
原创 linux sed 批量替換字符串
比如，要將目錄/modules下面所有文件中的zhangsan都修改成lisi，這樣做： sed -i "s/zhangsan/lisi/g" `grep zhangsan -rl /modules` 解釋一下： -i 表示in
2019-02-22 21:17:55
原创 linux sort命令
sort是在Linux裏非常常用的一個命令，管排序的，集中精力，五分鐘搞定sort，現在開始！ 1 sort的工作原理 sort將文件的每一行作爲一個單位，相互比較，比較原則是從首字符向後，依次按ASCII碼值進行比較，最後將他們按升
2019-02-22 21:17:55
原创 sshd問題：A protocol error occurred. Change of username or service not allowed
在研究linux安全的時候遇到一個問題 原本打算修改linux直接遠程root登陸，修改爲sshd的配置文件後 Nano /etc/ssh/sshd_config 把#PermitRootLogin yes 修改爲Perm
2019-02-22 21:17:55
原创 shell判斷文件是否存在
shell判斷文件,目錄是否存在或者具有權限 #!/bin/sh myPath="/var/log/httpd/" myFile="/var /log/httpd/access.log" #這裏的-x
2019-02-22 21:17:55
原创 CentOS 禁止 ping 方法
打開終端，運行以下命令 sysctl -w net.ipv4.icmp_echo_ignore_all=1 sysctl -p
2019-02-22 21:17:55