#!/usr/bin/perl -w 
#strip.pl
while (<STDIN>) { last if /^ZINC/; }
print;
while (<STDIN>) { print; }
