Concatenate one string to another?

[sdslrn123]

This is related to the following thread but I was told once before that if I have a new query, I should put it in a new thread.

http://www.tek-tips.com/viewthread.cfm?qid=1236725&page=1

I believe I can solve the problem originally posted in the thread above if anyone has any ideas on how I can concatenate two strings from a data file as follows

ST
YZ1
YZ2

I want to convert it to
ST
YZ1YZ2

Any ideas? Thanks.

 

[jpasquini]

Don't know if I read the question correctly, but you can concatenate strings by using the '.' operator.

my $YZ1YZ2 = $YZ1 . $YZ2;

? ? ?

 

[Rieekan]

Or, if you're looking for strings that match the beginning characters, something like the following pseudo code should work...

use strict;

while (<DATA>) {
  if (=~ m/^YZ/) {
    $yz .= $_;
  }
  else {
    #do something else
  }
}

__DATA__
ST
YZ1
YZ2

- George