Select Code to Download

#!/usr/bin/perl
#server
...
    #remove multi-echo-clients from echo list
    @clients = grep {$_->{FILE} !~ $lfileno} @clients;
}