David Samuelsson wrote:
> 
> how do i only get the first part from this?
> 
> RTFRT_flu@23460@\GE_Machine <- replica:GE_Machine_KI@\GE_Machine
> 
> i get this value in $_, now i want to remove anything that is
> after <- including the arrow (what i want is: RTFRT_flu@23460@\GE_Machine)
> The arrow may point in the other direction, and the digits and
> letters are not similar all times. Any smart way using regexp or
> any other way?

my $data = (split)[0];

# or
my ($data) = /{\S+)/;



John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to