my $C = join ('', <Client>);