Jack Jack wrote: > > Hi All, Hello,
> I have an output from a cammand > I have to split and get only hostname in below output > > * av_test \\hostname\views\av_test.vws $ perl -le' my $line = q|* av_test \\\\hostname\views\av_test.vws|; print $line; my $host = reverse +( split /\\/, ( split q| |, reverse $line )[ 0 ] )[ -1 ]; print $host; ' * av_test \\hostname\views\av_test.vws hostname John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
