my $filename = "9077/00:00///:8087";
my @file = split('/', $filename);

my $newname = $file[0];