小問(wèn)，perl中哪些字符可以作為定界符

__lxmxn__

怎么我的不起作用呢？ll沒(méi)有變成大寫(xiě)。

$ cat ttt.pl
#! /usr/bin/perl

$str = 'hello';
$str =~ s x l + x uc $& xex;
print "$&\n";

$ ./ttt.pl
ll

Lonki

my $str = 'hello';
$str =~ s m(.*)m uc $1 me;
print $str;

[ 本帖最后由 Lonki 于 2007-10-19 22:06 編輯 ]

放驢娃

原帖由 __lxmxn__ 于 2007-10-19 21:37 發(fā)表
怎么我的不起作用呢？ll沒(méi)有變成大寫(xiě)。

不好意思，我前面寫(xiě)錯(cuò)了，應(yīng)該是 print "$str\n" 而不是 print "$&\n"