PERL:


PERL: - . 180


\ \ . , /\Bis\B/ "is" , . , thistle , vis-a-vis .

> ---------------------------------------------------------------------------------------------

\b, \w \s perlre(l); 6.23.

6.4.

­ .

: , ­ /, s/// .

6.1 . , . ­ ­ ( ) .

6.1. resname

ft'/usr/bin/perl -p

# resname - 堠 foo bar com

\ , ­ , ! \w, \W ( ­ )


6.4. 頠 189

8 ࠠ foo bar com [204 148 40 9] ( )

use Socket, 8 met_addr

s{ #

( # $1

(? #

(91 [-_] ) # 堠
[\w-] + #

\ #

) + #