25.10.2007, 10:30
|
|
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме:
4094601
Репутация:
495
|
|
Код:
#!perl
use strict;
use warnings;
my $page = '<td valign="top" width="33%"><img src="1" width="40" height="32"> <strong>2</strong><br>123:88f2ceb4ad7be1adfed2145c5dddd178</td>';
$page =~/<br>(\w+):(\w+)<\/td>/;
print "$1:$2 \n";
Код:
C:\>parse.pl
123:88f2ceb4ad7be1adfed2145c5dddd178
|
|
|