print$}+=$.=$}-$.||1while.1

# means -

while ( 1 ) {
   $. = $} - $.;
   $. ||= 1;
   $} = $} + $.;
   print $};
}