Help for this page
open COMP, "+>$file"; ... push @comp, "\t$var2\n"; my @array = <COMP>
@array ne @comp