#! /usr/bin/perl
while(read(STDIN, $str, 512) > 0){
    print "\000\002\000\000";
    print $str;
    print "\000\002\000\000";
}
print "\000\000\000\000";
print "\000\000\000\000";
