while(<$socket_name>){
        print $_;
}