Jeffrey [mailto:[EMAIL PROTECTED]] wrote:
>
> Another method is to specify different delimiters for
> the match. This avoids LTS (leaning toothpick
> syndrome):
>
> m#^/bootp/linux/#;
> m%^/bootp/linux/%;
> m(^/bootp/linux/);
>
> Each of the lines above are equivalent -- they're also
> equivalent to /^\/bootp\/linux\//;
No one mentioned this: /^\Q/bootp/linux/\E/;
also equivalent, but has an advantage when doing things like this:
$skipdir = '/bootp/linux/';
while (<INFILE>) {
next if /^\Q$skipdir\E/;
...
}
--
Mark Thomas [EMAIL PROTECTED]
Sr. Internet Architect User Technology Associates, Inc.
$_=q;KvtuyboopuifeyQQfeemyibdlfee;; y.e.s. ;y+B-x+A-w+s; ;y;y; ;;print;;
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
