use strict;
filedelete();

sub filedelete {

    use File::Remove qw(remove);
    remove \1, "'C:\Entwicklung\Perl\projects\Testen\bla'";

}