Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

A Simple Socket Server Using 'inetd'

by samizdat (Vicar)
on Apr 19, 2006 at 12:26 UTC ( #544341=perltutorial: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w -T
    
    ...
    # do your processing here!
        print "  $line\n";
    }
    
  2. or download this
    # chmod +x /usr/local/bin/sinet.pl
    
  3. or download this
    secshsms    6100/tcp   # DSW Handler for SECS-II/GEM HSMS traffic
    secshsms    6100/udp   # DSW
    
  4. or download this
    # DSW add-on for SECS-II over HSMS
    secshsms    stream    tcp    nowait    nobody    /usr/local/bin/sinet.
    +pl secshsms
    
  5. or download this
    # ps -ax | grep inetd
      563  ??  Is      0:00.01 /usr/sbin/inetd -wW -C 60
    # kill -1 563
    
  6. or download this
    #!/usr/bin/perl
    
    ...
    }
    exit;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perltutorial [id://544341]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (14)
As of 2014-11-27 11:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (183 votes), past polls