diff options
Diffstat (limited to 'preps/perl.d/fetchcpan')
-rwxr-xr-x | preps/perl.d/fetchcpan | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/preps/perl.d/fetchcpan b/preps/perl.d/fetchcpan index c39a3df..b9ddeaa 100755 --- a/preps/perl.d/fetchcpan +++ b/preps/perl.d/fetchcpan @@ -31,13 +31,13 @@ NR < 10 { next } END { for (dist in dists) { ver = dists[dist] - print dist, ver, paths[dist] | "sort >cpan.dists" + print dist, ver, paths[dist] | "sort > cpan.dists" } - close("sort >cpandists") + close("sort > cpan.dists") # Prints modules out in sorted order, too! - while(getline<"cpandists" > 0) { - print $1 "\n" mods[$1,$2] >"cpan.mods" + while((getline < "cpan.dists") > 0) { + print $1 "\n" mods[$1,$2] > "cpan.mods" } } |