<div>
If you want a Perl answer, since that's where this question was posted:<br />
<br />
perl -MFile::Basename -le &quot;print scalar fileparse shift,qr/\..*/&quot; S:/some/path/to/file.x
</div>


If you want a Perl answer, since that's where this question was posted:

perl -MFile::Basename -le "print scalar fileparse shift,qr/\..*/" S:/some/path/to/file.x

<div>
<div class="content wysiwyg-content">
How can I get the word after the last slash of a string and remove the dots if there is any?<br />
<br />
Example input:<br />
<br />

<pre><code id="code-10-28262641-1">S:/some/path/to/file.x</code></pre>
<br />
Expected output:<br />
<br />

<pre><code id="code-10-28262641-2">file</code></pre>
</div>
</div>


How can I get the word after the last slash of a string and remove the dots if there is any?

Example input:

(CODE)

Expected output:

(CODE)

How can I get the word after the last slash of a string and remove the dots if there is any?

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.