|Think about Loose Coupling|
How to convert an @ARGV to form based input?by taint (Chaplain)
|on Aug 21, 2012 at 06:03 UTC||Need Help??|
taint has asked for the
wisdom of the Perl Monks concerning the following question:
Greetings, Well, I spent last weekend creating an all encompassing DNS query perl script. Creation & testing was done from the CLI. Everything worked as intended. So today I set out to convert it to a web based form. But apparently my train of thought decoupled a few cars somewhere along the line. Because no matter how hard I tried, I couldn't generate a form that either 1) posted the input variable, or 2) didn't make perl squeal bloody murder. WHat I had hoped to accomplish today, was to incorporate a form field inline (within the script itself), using the POST method (to help thwart users embedding a query string from within their own pages, against mine). The script is quite large, but here's a snippet, that should reveal my intent:
using the above in a web page as:
produces the intended output. But, any incarnation of:
YES. I know $domain is replaced with (@ARGV), and this is truly trivial, but for the life of me, I'm stuck. Please help.
Thank you for all of your time and consideration.
#!/usr/bin/perl -Tw use perl::always; my $perl_version = "5.12.4"; print $perl_version;