use strict;
use warnings;
use File::Remove qw(remove);

filedelete();

sub filedelete {
   remove \1, 'C:\Entwicklung\Perl';
}