Help for this page
$ perl -e'$_ = "Hello"; print "<$1>\n" while /(?=(.*))/g;' <Hello> ... <llo> <lo> <o>