puts "a\n"

##</code><code>##

  puts "a"

##</code><code>##

sub puts {
  local $_ = pop; chomp; push @_, $_; goto &say
}