Ähm,
$name = ~s/^(.{8}).*(.{8})$/$1..$2/;
$name = ~s/^(.{8}).*(.{8})$/$1..$2/;
:-)
gruss
--
no strict;
no warnings;
man google
no strict;
no warnings;
man google
Ähm,
$name = ~s/^(.{8}).*(.{8})$/$1..$2/;
$name = ~s/^(.{8}).*(.{8})$/$1..$2/;
:-)
gruss