#!/usr/bin/perl -w
# make_data.pl - Don Yang (uguu.org)
#
# 07/16/10

use strict;

while(<>)
{
   last if /#include"template.txt"/;
}
print "\"\n";

while(my $line = <>)
{
   # The '+' will be inserted while drawing eyes
   $line =~ s/1022\+ \+1/10221/;
   print $line;
}