my $rec;foreach(@test){$rec.=$_."\n";}