X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fhttp_getter%2Ftools%2Furi_escape.pl;fp=helm%2Fhttp_getter%2Ftools%2Furi_escape.pl;h=0303e3f738088899ae7e3a5196b9cfd6b80ccfcf;hb=24463849d4236a0a7c848c0cf657e927514d75d4;hp=0000000000000000000000000000000000000000;hpb=d967a8607248901371c32efdd510e3d1fe353bd5;p=helm.git

diff --git a/helm/http_getter/tools/uri_escape.pl b/helm/http_getter/tools/uri_escape.pl
new file mode 100755
index 000000000..0303e3f73
--- /dev/null
+++ b/helm/http_getter/tools/uri_escape.pl
@@ -0,0 +1,16 @@
+#!/usr/bin/perl -w
+use strict;
+
+# escape a URI with uri escaping
+#
+# Stefano "Zack" Zacchiroli <zack@cs.unibo.it>
+#
+
+
+use URI::Escape;
+
+while(<>) {
+ chomp;
+ print uri_escape($_);
+ print "\n";
+}