[PerlChina] Re: 请教：如何匹配如下的hash？

OK. thank you very much.

On Jul 15, 1:33 am, kevin_li <xiaohuidexi...@163.com> wrote:
> $a='2:3:4';
> @b=split /:/,$a,2;
> print "@b\n";
>
> 这样也可以
> 写个循环把你想要的东西套进去就好了
> On 7月15日, 下午1时54分, Excel Chen <excel.chen....@gmail.com> wrote:
>
>
>
> > run the result :
>
> > @line=<DATA>;
> > %word=@line;
> > %word=~/(.*?):(.*)/;
>
> > print %word;
>
> > Applying pattern match (m//) to %hash will act on scalar(%hash) at
> > test.pl line 11.
> > Odd number of elements in hash assignment at test.pl line 12, <DATA>
> > line 4.
>
> > On Jul 14, 9:40 pm, Excel Chen <excel.chen....@gmail.com> wrote:
>
> > > 我测试了一下，好像不行。
> > > 我这样写，为什么不行？
> > > @line=<DATA>;
>
> > > %word=split (/:{1}/,@line);
>
> > > On Jul 14, 9:31 pm, kevin_li <xiaohuidexi...@163.com> wrote:
>
> > > > $a='1:22:3';
> > > > $a=~/(.*?):(.*)/;
> > > > print "$1\n";
> > > > print "$2\n";
>
> > > > On 7月15日, 下午12时16分, Excel Chen <excel.chen....@gmail.com> wrote:
>
> > > > > 我打开文件test.data 内容如下：
> > > > > text1.txt:http://google.com
> > > > > pts2.txt:http://google.com
> > > > > rtxhand.txt:googlefile.
>
> > > > > 我的目的：把每行第一个:符号之前的字符串赋给一个hash数组的key.
>
> > > > > 请问如何匹配？- 隐藏被引用文字 -
>
> > - 显示引用的文字 -
--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛
-~----------~----~----~----~------~----~------~--~---