URN Logo
UNIX Resources » Linux » China Linux Forum » Perl 编 程 » 3 » 新手问一个字符处理的问题
announcement 声明: 本页内容为中国Linux论坛的内容镜像,文章的版权以及其他所有的相关权利属于中国Linux论坛和相应文章的作者,如果转载,请注明文章来源及相关版权信息。
Resources
China Linux Forum(finished)
Linux Forum(finished)
FreeBSD China(finished)
linuxforum.net
  业界新闻与评论
  自由软件杂谈
  IT 人生
  Linux软件快递
  翻译作坊
  Linux图书与评论
  GNU Emacs/XEmacs
  Linux 中文环境和中文化
  Linux桌面与办公软件
  Linux 多媒体与娱乐版
  自由之窗Mozilla
  笔记本电脑上的Linux
  Gentoo
  Debian 一族
  网络管理技术
  Linux 安装与入门
  WEB服务器和FTP服务器
  域名服务器和邮件服务器
  Linux防火墙和代理服务器应用
  文件及打印服务器
  技术培训与认证
  Linux内核技术
  Linux 嵌入技术
  Linux设备驱动程序
  Linux 集群技术
  LINUX平台数据库
  系统和网络安全
  CPU 与 编译器
  系统计算研究所专栏
  Linux下的GUI软件开发
  C/C++编程版
  PHP 技 术
  Java&jsp技术
  Shell编程技术
  Perl 编 程
  Python 编 程
  XML/Web Service 技术
  永远的Unix
  FreeBSD世界
   
新手问一个字符处理的问题
新手问一个字符处理的问题 - EndlessRain [2005-01-17 13:55 | 839 byte(s)]
 
Re: 新手问一个字符处理的问题 - EndlessRain [2005-01-18 08:21 | 50 byte(s)]
 
Subject: 新手问一个字符处理的问题
Author: EndlessRain    Posted: 2005-01-17 13:55    Length: 839 byte(s)
[Original] [Print] [Top]
我有一个文件:sent.box
内容是:
base64
(空行)
d2VpZmVpOTkxNKOsxPq6w6OhDQoNCgloaSwgcGVybCxpdCdz
IGp1c3QgYSB0ZXN0Lg0KDQqhoaGh
(空行)
结束

我现在想做的是将空行之间的内容写入一个变量中
我所写的代码如下:
open FH,"sent.box" or die "$! ";
my $string;
my $i==0;
while($string=<FH>){
if($i==1){
print $string;
}
if($string=~/base64/){
$i++;
}
}
这样的输出多了两个空行。
怎样才能将它们去掉呢?
我想的一种方法是空行之间的字符最多每行有40个
怎样写一个变量让它去判断0<$_<40时,输出它?

请各位大侠指教,多谢。

[Original] [Print] [Top]
Subject: Re: 新手问一个字符处理的问题
Author: EndlessRain    Posted: 2005-01-18 08:21    Length: 50 byte(s)
[Original] [Print] [Top]
唉没人回我的贴么?
幸好搞定了。
[Original] [Print] [Top]
« Previous thread
uClinux支持perl么?now!
Perl 编 程
3
Next thread »
windows 2000下文件加锁的问题 file flock
     

Copyright © 2007 UNIX Resources Network, All Rights Reserved.      About URN | Privacy & Legal | Help | Contact us
备案序号: 京ICP备05006143    webmaster: webmaster@unixresources.net
This page created on 2008-07-17 04:08:56, cost 0.089073896408081 ms.