Pathname from URL

[Andre Majorel]

Looking for Perl code to convert a URL like

http://foobar.org/~a/b/c?d=e/f#g

to a Unix pathname like

foobar.org/~a/b/c?d=e%2Ff

The same sort of thing that wget -x does.

Even better if it offers the option of honouring the
Content-disposition HTTP header.

Thanks in advance !

 

[Peter Makholm]

Looking for Perl code to convert a URL like

http://foobar.org/~a/b/c?d=e/f#g

to a Unix pathname like

foobar.org/~a/b/c?d=e%2Ff

The generalt module for parsing URL's would be URI.pm. This will help
you with parsing the url into the individual parts. Putting this
together into the actual filename is probably something you'll need to
do yourself.

//Makholm

 

[George Mpouras]

Στις 16/4/2014 12:28, ο/η Andre Majorel έγÏαψε:

Looking for Perl code to convert a URL like

http://foobar.org/~a/b/c?d=e/f#g

to a Unix pathname like

foobar.org/~a/b/c?d=e%2Ff

The same sort of thing that wget -x does.

Even better if it offers the option of honouring the
Content-disposition HTTP header.

Thanks in advance !

#!/usr/bin/perl
use strict;
use warnings;
use feature qw/say/;
use URI;

my $url = URI->new('http://foobar.org/~a/b/c?d=e/f#g');
my $scheme = $url->scheme;

(my $what_you_want = $url->canonical)=~s/^$scheme:\/\///;
say $what_you_want;