A Safe String Example with uri_escape : URL « CGI « Perl






  1. Perl
  2. CGI
  3. URL

A Safe String Example with uri_escape

    


#!/usr/bin/perl -T

use strict;
use URI::Escape;
use CGI qw/:standard/;

my $unsafestring = "\$5/[3454]/this is a windows filename.asp";
my $safestring = uri_escape($unsafestring);

print header,
      start_html("start"),
      p("unsafe URL is: $unsafestring\n"),
      p("url_escape() function:$safestring\n"),
      end_html;

exit;








Related examples in the same category

1.Using set_message with CGI::Carp
2.URL Hex-Encoded Characters
3.Using uri_unescape to Make a String Without Escape Characters