Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re^4: Alternative (upload)

by agentorange (Sexton)
on Nov 08, 2012 at 09:45 UTC ( #1002854=note: print w/ replies, xml ) Need Help??


in reply to Re^3: Alternative (upload)
in thread Reliable FQDN from IP

I will take a look at doing that. Only been using Perl for 3-4 weeks so not up to speed on how I'd achieve it but I found a decent guide on here.

But would be good to give something back given how much help I got with my first steps from this site.

However I will admit to being slightly cautious of CPAN. I understand and completely appreciate that sharing code is to the benefit of others but excessive duplicate modules or those that overlap in functionality cause huge amounts of grief for newcomers - as I found! I ended up in a CPAN fog rather than focusing on coding what I wanted with Perl.

I addition I feel it can make people lazy. The below code to achieve what I required is trivial and linking in another module wasteful - at least in my eyes. :) For the moment though here is the code

@output = `nslookup 10.1.1.1`; @grepResults = grep /.arpa/, @output ; $fqdn = substr ( ( split ( /= / , $grepResults[0] ) )[1], 0, -2 ) ; print "fqdn=$fqdn\n" ;


Comment on Re^4: Alternative (upload)
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (13)
As of 2015-07-07 22:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (93 votes), past polls