<div>
my $str = &quot;/mycmp/kmg/vel/kat/Atk/ca<wbr />che/0915/0<wbr />914222222.<wbr />submit.tol<wbr />gar.111111<wbr /><br />
&quot;;<br />
my ($val1, $val2) = $str =~ m{/kat/(\w+).*\.(\w+)};<br />
<br />
$val1 and $val2 is what you need.
</div>


my $str = "/mycmp/kmg/vel/kat/Atk/cache/0915/0914222222.submit.tolgar.111111
";
my ($val1, $val2) = $str =~ m{/kat/(\w+).*\.(\w+)};

$val1 and $val2 is what you need.

<div>
is it possible to separate them into two lines to make it more readable?<br />
<br />
Thanks,<br />
<br />

</div>


is it possible to separate them into two lines to make it more readable?

Thanks,



<div>
<div class="content wysiwyg-content">
Hi,<br />
I have a variable somewhere in my code.<br />
<br />
The string looks like this:<br />
<br />

<pre><code id="code-10-27362776-1">/mycmp/kmg/vel/kat/Atk/cache/0915/0914222222.submit.tolgar.111111</code></pre>
<br />
From this string I want to extract the followings:<br />
<br />

<pre><code id="code-10-27362776-2">Atk
111111</code></pre>
<br />
The grammar rule is:<br />
<br />
The beginning of the string is always same:<br />
<br />

<pre><code id="code-10-27362776-3">/mycmp/kmg/vel/kat/</code></pre>
<br />
and the number that I want is always after the last dot character till the end<br />
<br />
<br />
In general according to the rule I can write:<br />
<br />

<pre><code id="code-10-27362776-4">/mycmp/kmg/vel/kat/X/cache/ANYTHING.X</code></pre>
<br />
I want to extract X values from this string<br />
<br />
How can I do it in Perl?<br />
<br />
Thanks,<br />

</div>
</div>


Hi,
I have a variable somewhere in my code.

The string looks like this:

(CODE)

From this string I want to extract the followings:

(CODE)

The grammar rule is:

The beginning of the string is always same:

(CODE)

and the number that I want is always after the last dot character till the end


In general according to the rule I can write:

(CODE)

I want to extract X values from this string

How can I do it in Perl?

Thanks,


How to extract a value from a string seperated by dot character in Perl?

Perl is a high-level, general-purpose, interpreted, dynamic programming languages with over 25 years of development. Perl 5 runs on over 100 platforms from portables to mainframes and is suitable for both rapid prototyping and large-scale development projects.  Perl gained widespread popularity as a Common Gateway Interface (CGI) scripting language, in part due to its regular expression and string parsing abilities. In addition to CGI, Perl is used for graphics programming, system administration, network programming, finance, bioinformatics, and other applications.