Warly <[EMAIL PROTECTED]> writes:
> in perl:
>
> opendir RPMS, "PATH_TO_YOUT_RPMS";
> open L, ">/var/lib/urpmi/list.cooker";
> print L "file:/PATH_TO_YOUT_RPMS/", join "\nfile:/PATH_TO_YOUR_RPMS/", grep {
>/\.rpm$/} readdir RPMS;
print L join "\n", map { "file:/PATH_TO_YOUR_RPMS/$_" } grep { /\.rpm$/} readdir RPMS;
