my $page;
$something =~ m!([^/!]*$)! and $page = $1;