use File::Spec; my @module = split /::|-/, $module; $module = File::Spec->catfile(@module);