Not everything must be done with a regexp:
print if substr ($_, 0, 1) == length substr ($_, 1); [download]
-- Frank
In reply to Re: RegExp madness by haoess in thread RegExp madness by palandir