«

Hi,

I'm using Perl 5.8.9 on Mac 10.6.3. I have a file and I want to have
a new file where the uri_escape function is applied to each line of
the file. However, this call

perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt

only partially works. The result is a line that contains the escaped
string, and then the original string. How do I modify the code above
to print out only the escaped string?

Thanks, - Dave

On Thu, 24 Feb 2011 09:41:54 -0800 (PST), Dave <> wrote:

>Hi,
>
>I'm using Perl 5.8.9 on Mac 10.6.3. I have a file and I want to have
>a new file where the uri_escape function is applied to each line of
>the file. However, this call
>
>perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt
>
>only partially works. The result is a line that contains the escaped
>string, and then the original string. How do I modify the code above
>to print out only the escaped string?
>
perl -ni -mURI::Escape -e 'print uri_escape($_)' link_names.txt

maybe

-sln

On 24/02/11 17:41, Dave wrote:
> Hi,
>
> I'm using Perl 5.8.9 on Mac 10.6.3. I have a file and I want to have
> a new file where the uri_escape function is applied to each line of
> the file. However, this call
>
> perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt
>
> only partially works. The result is a line that contains the escaped
> string, and then the original string. How do I modify the code above
> to print out only the escaped string?
>
> Thanks, - Dave

Hi Dave,

perl -n -E 'use URI::Escape; say uri_escape($_)' link_names.txt

Cheers,
Charlie

Dave wrote:
> Hi,
>
> I'm using Perl 5.8.9 on Mac 10.6.3. I have a file and I want to have
> a new file where the uri_escape function is applied to each line of
> the file. However, this call
>
> perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt
>
> only partially works. The result is a line that contains the escaped
> string, and then the original string. How do I modify the code above
> to print out only the escaped string?


Check the documentation to see what those flags actually do:

perldoc perlrun

Hint: using -p along with print might be redundant.

If you want a new file, then you need to specify it. Hint: -i

On 24.02.2011 18:41, Dave wrote:
> Hi,
>
> I'm using Perl 5.8.9 on Mac 10.6.3. I have a file and I want to have
> a new file where the uri_escape function is applied to each line of
> the file. However, this call
>
> perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt
>
> only partially works. The result is a line that contains the escaped
> string, and then the original string. How do I modify the code above
> to print out only the escaped string?
>
> Thanks, - Dave

The -p already prints the original line, just leave it and it should work.

gerhard

>>>>> "p" == pleier <> writes:

>> perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt

p> The -p already prints the original line, just leave it and it should work.

leave what? uri_escape returns a value so it needs to either be printed
explicitly or assigned to $_.

these should be equivilent:

perl -pi -e 'use URI::Escape; $_ = uri_escape($_)' link_names.txt
perl -ni -e 'use URI::Escape; print uri_escape($_)' link_names.txt

and using -M is a little cleaner too:

perl -pi -MURI::Escape -e '$_ = uri_escape($_)' link_names.txt

uri

--
Uri Guttman ------ -------- http://www.sysarch.com --
----- Perl Code Review , Architecture, Development, Training, Support ------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------

On Feb 24, 12:50*pm, "Uri Guttman" <u...@StemSystems.com> wrote:
> >>>>> "p" == pleier *<n...@pleier.org> writes:
>
> * >> perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt
>
> * p> The -p already prints the original line, just leave it and it should work.
>
> leave what? uri_escape returns a value so it needs to either be printed
> explicitly or assigned to $_.
>
> these should be equivilent:
>
> perl -pi -e 'use URI::Escape; $_ = uri_escape($_)' link_names.txt
> perl -ni -e 'use URI::Escape; print uri_escape($_)' link_names.txt
>
> and using -M is a little cleaner too:
>
> perl -pi -MURI::Escape -e '$_ = uri_escape($_)' link_names.txt
>
> uri
>
> --
> Uri Guttman *------ *u...@stemsystems.com *-------- *http://www.sysarch.com--
> ----- *Perl Code Review , Architecture, Development, Training, Support ------
> --------- *Gourmet Hot Cocoa Mix *---- *http://bestfriendscocoa.com---------

Thanks for everyone's suggestions. Unfortunately, I got different
errors from all of them except Uri's. Uri, you're solution did not
result in any errors, but everything appeared on one long line (I
noticed the carriage returns got escaped as "%0A"). Is there a way to
make each line appear separately? - Dave

On 2011-02-24, Charlie Harvey <charlie+> wrote:
> On 24/02/11 17:41, Dave wrote:
>> Hi,
>>
>> I'm using Perl 5.8.9 on Mac 10.6.3. I have a file and I want to have
>> a new file where the uri_escape function is applied to each line of
>> the file. However, this call
>>
>> perl -pi -e 'use URI::Escape; print uri_escape($_)' link_names.txt
>>
>> only partially works. The result is a line that contains the escaped
>> string, and then the original string. How do I modify the code above
>> to print out only the escaped string?
>>
>> Thanks, - Dave
>
> Hi Dave,
>
> perl -n -E 'use URI::Escape; say uri_escape($_)' link_names.txt

This is for 5.10, the OP doesn't have 5.10.

Justin.

--
Justin C, by the sea.