发布时间：2013-06-11 21:06:38
学习Perl脚本，按照Perl语言入门这本书，记录学习Perl的点点滴滴第一章 简介1.Hello world[root@db2 home]# ./HelloWorld.pl Hello, crule world![root@db2 home]# perl HelloWorld.pl Hello, crule world![root@db2 home]# cat HelloWorld.pl #!/usr/bin/perlprint "Hello, crule world!\n";.........【阅读全文】
发布时间：2013-06-08 22:28:05
#!/usr/bin/expect -fset password password#downloadspawn scp root@192.168.1.100:/opt/step3.sh /home/set timeout 30expect "root@192.168.1.100's password:"set timeout 30send "$password\r"set timeout 30send "exit\r"expect eof......【阅读全文】
发布时间：2013-06-08 22:25:00
#!/usr/bin/expect-fset password 123456#downloadspawn scp root@192.168.1.218:/root/a.wmv /home/hbhe/set timeout 300 expect "root@192.168.1.218'spassword:"set timeout 300 send "$password\r"set timeout 300 send "exit\r"expect eof #uploadspawn scp /home/hbhe/abc.sqlroot@.........【阅读全文】
发布时间：2013-06-08 21:43:56
#!/bin/shif [ $# != 2 ]; then echo "Usage: $0 device dest" echo "E.g. $0 hda/mnt/usb/linux-debian5-disk-v1.0-" exit 0fiDISK=$1NAME=$2cd /mkdir ${DISK}1mount /dev/${DISK}1 /${DISK}1 || exit 0cd /${DISK}1tar zcvf ${NA.........【阅读全文】
