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.
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/