I am an admitted perl newbie. So please be gentile I bruise easily. I have a very simple question for someone who actually knows perl as I stumble through it. I have a variable and I want to split/parse/seperate it into two variables. One taking all characters before the pipe "|" and the other taking all characters after the "|". For example here is what I have:

$inVar = " abc123 | 345 def ";

what I want to parse it out into is:

$outSplitVar1 = "abc123";
$outSplitVar2 = "345 def";

I want to trim off all leading and trailing spaces but retain any spaces in the middle. Any suggestions other than loop through character by character. I can do that but seek something simpler.

A humbly thank you in advance for any Perl Gods who are willing to waste their time to answer my sniveling unimportant trivial question.

Hey robprell

Sounds like you need to use regular expressions, list context and split. You can do a google for each of these things. Once you know them, you can do:

Gives us:



--
Charlie Harvey's website - linux, perl, java, anarchism and punk rock: http://charlieharvey.org.uk

#!/usr/bin/perl
use warnings;

my $inVar = " abc123 | 345 def ";

@arr=split(/\|/,$inVar);

foreach (@arr)
{
$_ =~ s/^[\s]* (.+\S) [\s]*$/$1/g;

}

foreach (@arr)
{
print "$_#######\n";
}




Use code above to get rid of your problems