$URL = "http://www.your.com/your/url/text.txt";
my @list = split(/\//, $URL);
print $list[$#list];