"Mumia W." schreef: > my $lang = ($topdir =~ /([^\/]+)$/)[0];
ITYRMSL: my ($lang) = $topdir =~ m~([^/]+)$~; -- Affijn, Ruud "Gewoon is een tijger." -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/