mkNEWS revision ab2a2de2797dab2442564adfd92adbd28830ad58
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce#!/usr/bin/perl
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryceuse strict;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryceuse warnings;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
7e0337b0c91e10012bc41d0671b603ae73c89831acspikemy $wiki = "http://wiki.inkscape.org/wiki/index.php";
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryceif (@ARGV < 1) {
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce print "Usage: $0 <release-number>\n";
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce}
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbrycemy $rel = shift @ARGV;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce$rel =~ s/\.//;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
ab2a2de2797dab2442564adfd92adbd28830ad58brycemy @page = `lynx -dump $wiki/ReleaseNotes$rel`;
ab2a2de2797dab2442564adfd92adbd28830ad58bryce
ab2a2de2797dab2442564adfd92adbd28830ad58bryceprint "$#page lines\n";
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbrycemy $seen_overview = 0;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryceforeach my $line (@page) {
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
ab2a2de2797dab2442564adfd92adbd28830ad58bryce $line =~ s/\[\[\d+\]edit\]//g;
ab2a2de2797dab2442564adfd92adbd28830ad58bryce
ab2a2de2797dab2442564adfd92adbd28830ad58bryce last if $line =~ /^ Previous releases/;
ab2a2de2797dab2442564adfd92adbd28830ad58bryce
ab2a2de2797dab2442564adfd92adbd28830ad58bryce if ($line =~ /^\s+Inkscape 0\.46/) {
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce $seen_overview = 1;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce }
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce next unless $seen_overview;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce print $line;
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce}
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryce
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryceprint "\nFor information on prior releases, please see:\n";
d449a6d3082a6c8e84a76f53682d0a22fdb9bdebbryceprint " $wiki/Inkscape\n";