shell/perl - 国产0与1 - 51CTO技术博客-领先的IT技术博客

hello_world 的BLOG

博客统计信息

用户名：hello_world
文章数：116
评论数：62
访问量：31359
无忧币：1024
博客积分：1017
博客等级：5
注册日期：2007-10-31

最新评论

[匿名]51cto游客：有没有流程图给个啊谢谢

[匿名]51cto游客：很好很强大

[匿名]51cto游客：十分感谢

[匿名]遇见：谢谢！

友情链接

Drinkey s basement

52121CM

风吹云动

国产001

背景音乐

我的音乐	00:00 \| 00:00

公告

我的仓库没锁门，需要什么随便取。。。。

热门文章

51CTO推荐博客

struggle1=1	lhtwy
IT昆仑	davidchen
beniao	david_yeung
daizhenjun	maddish
北京看看	mk6yeung
刘古权	davjw

文章

文章列表>>

新方法逐行读取文件并进行相应的操作

2008-01-17 14:04:03

        与上次使用的方法不同，这次我使用了awk这个文本过滤工具来实现逐行的读取JSP的配置文件。然后根据需要，对配置文件中的内容即待检测的选项分别处理。
        代码如下：
[root@localhost kernel]# cat linux_main
#!/bin/bash

clear
i=1
length=`awk 'END{print NR}' /server_test/reports/config/server_test_config.txt`
while (( $i <= $length ))
do
    choice=`awk "{if ( NR == $i ) print }" /server_test/reports/con..

类别：shell/perl | 阅读全文(186) | 回复(0)

SED and AWK下载(chm版)

2008-01-13 11:40:23

O\'Reilly的经典系列图书，网上多数是HML版的《sed与awk》，嘿嘿，把自己的chm版的《sed and awk》分享给大家。

类别：shell/perl | 阅读全文(654) | 回复(2)

shell语言处理多行合并一行问题

2008-01-10 18:38:58

刚处理问题时需要将 system_finger.txt中的两行合并起来中间以分号作分割符。

system_finger.txt内容为：
fc7:2.6.23.1
Fedora release 7 (Moonshine)

查找下资料知道用awk可以完成这项艰巨的任务。

awk '{if(NR%2==0){printf $0}else{printf "%s：",$0}}' > system_fingerprint.txt

cat system_fingerprint.txt 看看

fc7:2.6.23.1:Fedora release 7 (Moonshine)

good ！

类别：shell/perl | 阅读全文(133) | 回复(1)

UNIX入侵

2007-11-10 16:30:02

转载于 http://www.itcomputer.com.cn/Virus/gfaq/200610/122187.html

１．UNIX Shell：

　　　　命令解释程序Shell处在内核（Kernel）与外层软件之间，具有非常重要的
地位及作用，Shell的作用是逐条的解释用户输入的命令，并给出回答及提示，它用
于协调用户及系统的一致性，在用户及系统中进行交互。
当用户进入系统，就开始和Shell命令解释程序的主控程序进行通信，每引用一次解
释程序就调用一个Shell，读入并执行用户键入的指令。Shell还包括一些后台处理、
输入输出改向、管道、过滤程序和文件..

类别：shell/perl | 阅读全文(25) | 回复(0)

SHELL病毒简介

2007-11-10 16:14:39

转载于 http://www.itzs.net/Article/wlaq/hkgj/200612/25879.html

1. 前言

说起病毒总有点神秘的味道，想起以前用汇编编写第一个dos病毒时是那么的痛苦

从开始有设想到完成花了3个多月，而且写的也是乱七八糟，最近突发奇想不就是感

染其他文件，传播自己吗，用shell写一个病毒且不是非常简单，于是顺手写了如下
这么一个小脚本，功能就是感染其他shell程序。

这个程序在现实意义不大，但对于形象的理解病毒传播机制还是很很有帮助，可以
算教学意义大于实际意义吧。

2.
程序代码

#!..

类别：shell/perl | 阅读全文(29) | 回复(0)

推荐几本学习shell的书

2007-11-08 19:17:46

[1] 高级Bash脚本编程指南
 http://www.linuxpk.com/doc/abs/
[2] shell十三问
http://bbs.chinaunix.net/thread-218853-1-1.html
[3] shell基础十二篇
http://bbs.chinaunix.net/thread-452942-1-1.html
[4] 在linux下学习和工作
http://oss.lzu.edu.cn/modules/newbb/viewtopic.php?topic_id=775&forum=6
[5] 在linux下更高效的工作
http://oss.lzu.edu.cn/modules/newbb/viewtopic.php?topic_id=1074&forum=6
[6] SED手册
[url]http://phi.sinica.edu.tw/aspac/repo..

类别：shell/perl | 阅读全文(32) | 回复(0)

找出linux系统没有的补丁

2007-11-07 18:22:11

同学先用了一个perl程序，把ftp.kernl.org上的补丁目录读取在一个文件list中，然后我用了shell把没有打的补丁找出。^_^开始时是用C写的，感觉比较麻烦，于是就边看shell边写了下这个
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
perl程序如下：
#!/usr/bin/perl
use Net::FTP;

my $host="www.kernel.org";
my $directory = "pub/linux/kernel/v2.6";
$ftp = Net::FTP->new($host,Timeout=>240) or $newerr = 1;
push @ERRORS, "Can't connect to ftp $host: $!\n" if $newerr;
myerr(..

类别：shell/perl | 阅读全文(42) | 回复(1)

awk分隔符

2007-11-07 15:03:40