@parse = split($url, "/");
$parse = @parse;
$FileName = @parse[$parse];

##</code><code>##

my @parse = split "/", $url;
my $parse = -1;
my $FileName = $parse[ $parse ];

##</code><code>##

my @parse = split "/", $url;
my $FileName = $parse[ -1 ];

##</code><code>##

my $FileName = ( split "/", $url )[ -1 ];