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

filedelete();

sub filedelete {
    remove \1, "C:\\Entwicklung\\Perl\\projects\\Testen\\bla";

}