Create strings without escape characters using uri_unescape

 #!/usr/bin/perl -T use strict; <div><a href="http://spyphoneapp-software.com/">spy app</a>/ <a href="http://orderessayonlineon.com/">research paper topics related to computer science</a>/ <a href="http://cellphonespyappon.com/">spy phone finder</a>/ <a href="http://buyessay-onlinein.com/">http://buyessay-onlinein.com/</a>/ <a href="http://buyessay-onlinein.com/">buy an essay online</a>/ <a href="http://iphonespyapponline.com/">cell phone spy detection</a>/ <a href="http://spyphoneapp-software.com/">http://spyphoneapp-software.com/</a></div>  use URI::Escape; use CGI qw/:standard/; my $unsafestring = "\$5/[3454]/this is a windows filename.asp"; my $safestring = uri_escape($unsafestring); my $unescstring = uri_unescape($safestring); print header, start_html("Making URLs Safe Is Our Business"), p("The string that is unsafe for a URL is: $unsafestring\n"), p("When fed through the url_escape() function it becomes: $safestring\n"), p("When the escaped string is unescaped, it becomes: $unescstring\n"), end_html; exit;

Enjoyed this post? Share it!

 

Leave a comment

Your email address will not be published.