use strict;

$\ = "Just Another Perl Hacker";

print "Just Anothe\r Pe\rl Hacke\r";