C:\>perl -we "print substr 'hello', (2 ** 32)+$_, 1 for 0..4" hello