if ($arg  =~ /^!average (.*)/i ) {
   chdir("pfad zum ornder wo text datein gespeichert sind");
       if ( $1) {
        my $dateiPfad =  $1;