#!/usr/bin/perl
#   zeroize.pl 1.1 2004-11-25 13:11:54-05 davidsen Exp

# zeroize - read lines from stdin and write to stdout, change NL to \000

while (<>) {
	chomp;
	print "$_\0";
}

exit 0;