Help for this page
$_ = "Hello"; print "$1\n" while /(?=(.*))/g;
Hello
$_ = "Hello"; print "$1\n" while /(?=(.*)?)/g;
Hello ello ... lo o