All right, I read your OP this time. :P Your original code is not quite right. You've probably adjusted it to work on your box but what you posted is both broken and dangerous if not fixed properly. Always use strict.

You get $string from the CGI parameters but then use $domain in the dig call. You also pass user input directly to the shell with the backticks (``). This is about as serious a security mistake as there is. Also, there is no JSON in your code or implied in your jQuery code, so drop the use statement.

Adjusted, and simplified a little for ease of testing, with non-OO CGI and shell quoting capture of the command. You will probably have to install Capture::Tiny but it may be the easiest way to make the call to dig safe from exploits.

#!/usr/bin/env perl
use strict;
use warnings;
use CGI ":standard";
use Capture::Tiny "capture_merged";

my $domain = param("s") || "example.org";

my $dig = capture_merged { system "dig", $domain };

print header(),
    escapeHTML($dig);

[download]

Your display problem has two possible solutions. Either fix the style of the #result div or jQ =~ s/text/html/

<div id="result" style="white-space:pre"></div>

[download]
# CGI change
print header(),
    pre(escapeHTML($dig));
# plus JS change
        $("#result").html(res);

[download]

In reply to Re: Format script output to jQuery ajax call by Your Mother
in thread Format script out in JSON for webpage by HBMBR

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.