sub preprocess { my @dir = @_; print "pre\n"; return @dir; }