Perl- check the port used Post: 302523582

Sponsored Content

Top Forums Shell Programming and Scripting Perl- check the port used Post 302523582 by Skrynesaver on Thursday 19th of May 2011 06:19:18 AM

05-19-2011

Registered User

I'd tend to use grep on an array rather than a string, for a string I'd go for something like the following with a straight regex. (Note: regex used works for my flavour of netstat and may need amending to work for you, (netstat 1.42 (2001-04-15) from net-tools 1.6)

Code:

#!/usr/bin/perl

#ALWAYS use these 2 lines if it's worth saving the file
use strict ;
use warnings;

my $port=$ARGV[0]; #TODO validate and print usage if wrong
my $netstat=`netstat -ln`; #get output of netstat command

#Check for service listening on the port
my ($service)=$netstat=~/\w+\s+\d+\s+\d+\s+[\d.:]+:$port\s+[\d:.]+:\*\s+LISTEN/;

if ($service){
    print "There is a service listening on $port\n"
}else{
   print"No service on $port\n";
}

Last edited by Skrynesaver; 05-19-2011 at 07:22 AM.. Reason: Left in final quote from cmndline development

This User Gave Thanks to Skrynesaver For This Post:

Skrynesaver

View Public Profile for Skrynesaver

Find all posts by Skrynesaver

10 More Discussions You Might Find Interesting

1. IP Networking

how can i check if port is busy or if someone is using it ?

Hello i have application that using ports , how can i check if the port im using is not captured by any applications?

2. IP Networking

How can I check what port addresses used the application

Hello Mentors! I am a new here in the furom, i hope somebody can understand my problem. Basically we have an application here called unigraphics and being installed per station and the setup is look like this. 1. installed unigraphics UGNX3 version on every station 2. some are installed in...

3. Solaris

How to check that a device is attached on a port

Q1: can anyone tell me how cfgadm keeps track of the device even if the device is disconnected , when we disconnect a device using cfgadm cfgadm -ys disconnect <ap_id> then the device disappears from the lshal o/p. HAL uses libdevinfo for the device list. if the device is not there in the...

4. UNIX for Dummies Questions & Answers

How do you check whether a port currently being used?

Hi, Please help me out, how to check whether a port currently being used or not. is there any command which give the result? Thanks Rajesh

5. Shell Programming and Scripting

How to check if a Port is accepting connections.

Hi, I need to create a script which checks the availability of a particular service on a particular Port on HP-Unix. Is there any command in unix wherein we can check if any port is accepting the connections now. Thanks, Vihang.

6. Shell Programming and Scripting

Perl code to check date and check files in particular dir

Hi Experts, I am checking how to get day in Perl. If it is “Monday” I need to process…below is the pseudo code. Can you please prove the code for below condition. if (today=="Monday" ) { while (current_time LESS THAN 9:01 AM) ...

7. Shell Programming and Scripting

How to check UDP port example = 31011?

We have open port UDP port 31011, how to verify if port were working or traffic were receive.

8. Red Hat

How to check port used for SSL?

I have RHEL 5.8 in our production environment. We are using SSL, my query is how to find the port used for SSL. In /etc/services, it shows 443 but when I give netstat -tulpn | grep 443 Or netstat -tulp | grep https I do not get any output. I hope, my question is clear of how to find...

9. Shell Programming and Scripting

How to check empty port using netstat?

Hi, How to check empty port using netstat please help Thanks Ashfaque

10. Shell Programming and Scripting

How to check the IP:PORT firewall uses?

I have my firewall process running # ps -ef | grep firewall root 21169 1 0 08:50 ? 00:00:00 /usr/bin/python -Es /usr/sbin/firewalld --nofork --nopid I wish to know what ip : port number it is using. Can you please tell me how can i find out ? I tried the below command...

LEARN ABOUT HPUX

aa-unconfined

AA-UNCONFINED(8)						     AppArmor							  AA-UNCONFINED(8)

NAME

       aa-unconfined - output a list of processes with tcp or udp ports that do not have AppArmor profiles loaded

SYNOPSIS

       aa-unconfined

DESCRIPTION

       aa-unconfined will use netstat(8) to determine which processes have open network sockets and do not have AppArmor profiles loaded into the
       kernel.

BUGS

       aa-unconfined must be run as root to retrieve the process executable link from the /proc filesystem. This program is susceptible to race
       conditions of several flavours: an unlinked executable will be mishandled; an executable started before a AppArmor profile is loaded will
       not appear in the output, despite running without confinement; a process that dies between the netstat(8) and further checks will be
       mishandled. This program only lists processes using TCP and UDP. In short, this program is unsuitable for forensics use and is provided
       only as an aid to profiling all network-accessible processes in the lab.

       If you find any bugs, please report them at <http://https://bugs.launchpad.net/apparmor/+filebug>.

SEE ALSO

       netstat(8), apparmor(7), apparmor.d(5), aa_change_hat(2), and <http://wiki.apparmor.net>.

AppArmor 2.7.103						    2012-06-28							  AA-UNCONFINED(8)

10 More Discussions You Might Find Interesting

1. IP Networking

how can i check if port is busy or if someone is using it ?

Discussion started by: umen

2. IP Networking

How can I check what port addresses used the application

Discussion started by: eykyn17

3. Solaris

How to check that a device is attached on a port

Discussion started by: narendra.pant

4. UNIX for Dummies Questions & Answers

How do you check whether a port currently being used?

Discussion started by: rajesh08