in reply to Remove from character to end of line

You could do somthing like

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

my $newname = $file[0];

[download]

MGW Aplications Developer QuinnTeam Inc.

In Section Seekers of Perl Wisdom