How to execute perl from bash

[Nicolas Briones]

Hi everyone!
I need to trip blank spaces at begin and end on certain string.

I can do it executing

perl -e '$str = " 2003-07-29 "; $str =~ s/^\s+|\s+$//g; print $str;'

works fine!

but i need the value inside a script. So i wrote:

------------------------------
#!/bin/bash

curr_date=" 2003-07-29"

t=`perl -e "$str = \"$curr_date\"; $str =~ s/^\s+|\s+$//g; print
$str;\"`

echo $t
-------------------------------

And i get error!

i try

------------------------------
#!/bin/bash

curr_date=" 2003-07-29"

t=`perl -e "\$str = \"$curr_date\"; \$str =~ s/^\s+|\s+$//g; print
\$str;\"`

echo $t
-------------------------------

And i get error too. The problem is that i can't set perl variables
inside the -e section. The problem (it seems) how bash make diference
between script and perl variables?

Thanx!

[email]nbriones@puc.cl[/email]

[Barry Margolin]

In article <208fae61.0307301249.32b584e6@posting.google.com >,
Nicolas Briones <nbriones@puc.cl> wrote:

>Hi everyone!
>I need to trip blank spaces at begin and end on certain string.
>
>I can do it executing
>
>perl -e '$str = " 2003-07-29 "; $str =~ s/^\s+|\s+$//g; print $str;'
>
>works fine!
>
>but i need the value inside a script. So i wrote:
>
>------------------------------
>#!/bin/bash
>
>curr_date=" 2003-07-29"
>
>t=`perl -e "$str = \"$curr_date\"; $str =~ s/^\s+|\s+$//g; print
>$str;\"`
>
>echo $t
>-------------------------------
>
>And i get error!

You should be using single quotes, not double quotes, just like you did
when you executed the command manually. Inside double quotes, $ is used to
indicate shell variables.

--
Barry Margolin, [email]barry.margolin@level3.com[/email]
Level(3), Woburn, MA
*** DON'T SEND TECHNICAL QUESTIONS DIRECTLY TO ME, post them to newsgroups.
Please DON'T copy followups to me -- I'll assume it wasn't posted to the group.

[John W. Krahn]

Nicolas Briones wrote:

>
> Hi everyone!
> I need to trip blank spaces at begin and end on certain string.
> I can do it executing
>
> perl -e '$str = " 2003-07-29 "; $str =~ s/^\s+|\s+$//g; print $str;'
>
> works fine!
> but i need the value inside a script. So i wrote:
>
> ------------------------------
> #!/bin/bash
>
> curr_date=" 2003-07-29"
> t=`perl -e "$str = \"$curr_date\"; $str =~ s/^\s+|\s+$//g; print $str;\"`
> echo $t
> -------------------------------
>
> And i get error!
> i try
>
> ------------------------------
> #!/bin/bash
>
> curr_date=" 2003-07-29"
> t=`perl -e "\$str = \"$curr_date\"; \$str =~ s/^\s+|\s+$//g; print \$str;\"`
> echo $t
> -------------------------------
>
> And i get error too. The problem is that i can't set perl variables
> inside the -e section. The problem (it seems) how bash make diference
> between script and perl variables?

curr_date=" 2003-07-29"
t=`perl -e's/^\s+//, s/\s+$// for $ARGV[0]; print $ARGV[0]' $curr_date`
echo $t



John
--
use Perl;
program
fulfillment

[Chris]

Nicolas Briones wrote:

> Hi everyone!
> I need to trip blank spaces at begin and end on certain string.
>
> I can do it executing
>
> perl -e '$str = " 2003-07-29 "; $str =~ s/^\s+|\s+$//g; print $str;'
>
> works fine!
>
> but i need the value inside a script. So i wrote:
>
> ------------------------------
> #!/bin/bash
>
> curr_date=" 2003-07-29"
>
> t=`perl -e "$str = \"$curr_date\"; $str =~ s/^\s+|\s+$//g; print
> $str;\"`
>
> echo $t
> -------------------------------
>
> And i get error!
>
> i try
>
> ------------------------------
> #!/bin/bash
>
> curr_date=" 2003-07-29"
>
> t=`perl -e "\$str = \"$curr_date\"; \$str =~ s/^\s+|\s+$//g; print
> \$str;\"`
>
> echo $t
> -------------------------------
>
> And i get error too. The problem is that i can't set perl variables
> inside the -e section. The problem (it seems) how bash make diference
> between script and perl variables?
>
> Thanx!
>
> [email]nbriones@puc.cl[/email]

Why are you using a bash script to run a perl one-liner? Surely it would
make more sense to simply write the whole thing as a perl script.

#! /usr/bin/perl -w

use strict;

my $curr_date = " 2003-07-29 ";

$curr_date =~ s/^\s+|\s+$//g;

print "$curr_date\n";



Chris.