Windows and Unix compatible way to extract filename. 
my $ME = $0;
$ME =~ s/.*[\\\/]//;
# $ME =~ s/\.[^.]+$//;

[download]
The extension is not removed, because the script placed in $PATH is still invoked by the name and extension. Another reason to leave the extension - its definition is weak in all operating systems. However sometimes you need the bare filename (for example script.pl requires script.conf). To cover this requirement uncomment the last line above. However if you need do it in mass - better choice to use modules. For example, already suggested by other responders.

In reply to Re: Extract main name of file by siberia-man
in thread Extract main name of file by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.