perl -le 'print for "foo bar"=~/(?=(.*))/g'
foo bar
oo bar
o bar
 bar
bar
ar
r