Ignore:
Timestamp:
2008-08-07T13:54:35+12:00 (16 years ago)
Author:
ak19
Message:

Removed comment. URL encode and URL decode subroutines added.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/unicode.pm

    r16672 r16673  
    579579    my ($text) = @_;
    580580    $text =~ s/([^A-Z0-9\.\-\_])/sprintf("%%%02X", ord($1))/iseg;
    581     # URL_encode spaces too?
    582     #$text =~ s/ /%20/sg;
     581
    583582    return $text;
    584583}
Note: See TracChangeset for help on using the changeset viewer.