2008年11月17日星期一

Re: [PerlChina] perl怎么读取文件或者路径参数

@ARGV是程序接收到的参数列表;
@_是子函数(sub myfunc)接收到的参数列表.

my ($file) = @_,取到的总是文件行数,如果是@file则是文件内容

你这样用是把@_做为scalar变量来用,这样取到的是数组的元素数量.



2008/11/17 purl lamp <lamp.purl@gmail.com>
在这里使用 <> 得到的是文件列表所有内容的拼接,使用 @ARGV 才是更加上游传进来的文件名列表。

第二个问题可以用正则替换,把开头不是的数字的东西归并到上一行。

2008/11/17 truncatei <truncatei@gmail.com>

<> 是用来快速读取参数提供的文件的内容或者data块定义的数据
用readdir吧

2008/11/17 owen nirvana <freeespeech@gmail.com>

我用<>总是不得要领,

my ($file) = @_,取到的总是文件行数,如果是@file则是文件内容
但是 @_不应该是参数列表吗,为什么不是 filename呢, 如果是输入路径的话,@_甚至 == 0,

但是我很希望能够直接在参数里得到路径名,然后批量打开某些类型的文件, 还请各位指教


还有一个问题,是关于提取数据的

2222  eewweasdds,asdasd.sadsadasdas
         ddasdddddddddddddddddddda
         ddddddddddddddddddddddddddd
2821  easdddddddddddddddddddddddd
2192  288888888888888888888ass0a-das.
         as;dddsaddaa0---------22222222

诸如此类,左边很好办,可是右边并不限于单行,我该如何把这样的数据提取为  name title的格式存到数据表里呢
gtalk:freeespeech@gmail.com
_______________________________________________
China-pm mailing list
China-pm@pm.org
http://mail.pm.org/mailman/listinfo/china-pm



--
"老是呆在那里不好,我们随生活需要四处迁徙,多年以来的梦想,至今还未实现,压力堵塞了我们的耳朵,工作生涯到了尽头,还是一无所有,我们应该给后人留下点儿什么,教训是不会刻在纪念碑上的,光荣的命令和指引之手,也可请求,简单地改变一下角度就足够了"

_______________________________________________
China-pm mailing list
China-pm@pm.org
http://mail.pm.org/mailman/listinfo/china-pm


_______________________________________________
China-pm mailing list
China-pm@pm.org
http://mail.pm.org/mailman/listinfo/china-pm



--
Best regards.
Felix New

没有评论: