#!/usr/bin/perl

$x=0;
while (<>) {
  chomp;
  $x++;
  print "STDOUT_$x=$_\n";
}