develooper Front page | perl.beginners | Postings from August 2009

Re: 'Join' query

Thread Previous | Thread Next
From:
Shawn H. Corey
Date:
August 7, 2009 08:46
Subject:
Re: 'Join' query
Message ID:
4A7C4C5F.7010708@gmail.com
jet speed wrote:
> Hi,
> 
> I would like to join the $abc with ':'  the final desired output 1:2:3:4:5
> 
> #!/usr/bin/perl
> 
> use strict;
> use warnings;
> 
> my $abc = "1 2 3 4 5";
> my $out = join ':', $abc;
> print "$out";
> 
> executing the above, i get the same output 1 2 3 4 5, not sure were am going
> wrong.
> 
> Any help on this would be much appreciated.
> 
> Thanks
> Sj
> 

$abc is a string; join works with arrays.  Two solutions: make it @abc 
or just replace the spaces.

my @abc = qw( 1 2 3 4 5 );
my $out = join( ':', @abc );

or

my $abc = "1 2 3 4 5";
( my $out = $abc ) =~ s{ \s+ }{:}gmsx;




-- 
Just my 0.00000002 million dollars worth,
   Shawn

Programming is as much about organization and communication
as it is about coding.

I like Perl; it's the only language where you can bless your
thingy.

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About