#!/usr/bin/perl # https://perlmonks.org/?node_id=1231527 use strict; use warnings; my $line='PSAPPSRV.26476584 (6) 01/02/19 06:30:30 GetCertificate(3) Re +turning context. ID=PTWEBSERVER, Lang=ENG'; my ($result) = $line =~ /^(?:\S* ){4}(.*)/; print "$result\n"; print "offset: $-[1]\n";
In reply to Re: With substr, index the offset don't get proper start position
by tybalt89
in thread With substr, index the offset don't get proper start position
by Oskym
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |