Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

Re: [Perl-CGI] Print non-interpolated string

by choroba (Canon)
on Apr 03, 2014 at 22:37 UTC ( #1081022=note: print w/ replies, xml ) Need Help??

in reply to [Perl-CGI] Print non-interpolated string

After clicking on submit Perl now starts to execute the contents of the textarea
I cannot reproduce the problem. If I run your script, HTML in the textarea is interpreted by the browser, but Perl commands are not run. To prevent the contents from evaluation, just replace all & to &amp;, and all < to &lt;.
$text =~ s/&/&amp;/g; $text =~ s/</&lt;/g;
لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Comment on Re: [Perl-CGI] Print non-interpolated string
Select or Download Code
Replies are listed 'Best First'.
Re^2: [Perl-CGI] Print non-interpolated string
by Digioso (Acolyte) on Apr 04, 2014 at 08:11 UTC
    Thanks for the links all. I'll check them out.
    For now I have uploaded my sample script here:
    Weird thing that you cannot reproduce it. Possibly could have to do with the webserver settings or the installed Perl version then.
    Neither are under my control unfortunately since I'm on a large webhoster.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (6)
As of 2015-11-26 00:45 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (695 votes), past polls