#!/usr/bin/perl -w my @ifconfig = `/sbin/ifconfig eth0`; for( @ifconfig ) { if( /(\d+\.\d+\.\d+\.\d+)/ ) { print "IP : $1\n"; last; } }
You need to create an account or log in to post comments to this site.
12372 users tagging and storing useful source code snippets
Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world
#!/usr/bin/perl -w my @ifconfig = `/sbin/ifconfig eth0`; for( @ifconfig ) { if( /(\d+\.\d+\.\d+\.\d+)/ ) { print "IP : $1\n"; last; } }
You need to create an account or log in to post comments to this site.