skeeve@Skeeves-PowerBook:~ $ perl -e '"<" =~ qr[(??{/^