#!/usr/bin/perl -w 

$_ = "http://www.my-website.be/gif/wwwtitle.gif";
print /\/([^\/]+)$/;