comment on

The most current stable version is Tk-804.028 released on 18 Dec 2007, which - for me - builds out of the box and passes all (even TODO) tests on perl-5.10.0, even under 64bit HP-UX 11.23

I get the most recent version from svn very often. I don't like svn, as it does only run on Linux, and I can't get it to work on HP-UX or AIX, so here's a script to get a tar archive from the svn trunk:

. . .

#!/pro/bin/perl

use strict;
use warnings;

my $url = "http://svn.perl.org/modules/Tk/trunk";

chdir "/pro/3gl/CPAN/Tk";

my ($revision) = (`svn info $url` =~ m{\s Rev:     \s+            ([0-
+9]+)  }mx);
my  @tbz = glob "Tk-*-[0-9]*.tbz";
if (@tbz and $tbz[-1] =~ m{.*-([0-9]+)\.tbz$} && $1 == $revision) {
    print STDERR "$tbz[-1] is the most recent already\n";
    exit;
    }

system "svn export $url Tk";

my ($version)  = (`cat Tk/Tk.pm`  =~ m{\b VERSION  \s+ = \s* ["'] ([0-
+9.]+) }mx); # "

my $tkdir = "Tk-$version-$revision";
rename "Tk", $tkdir;

print "Fetched $tkdir\n";

my $startrev = $revision - 400; # Last 100 changes
qx{svn log -r $startrev:$revision $url >$tkdir/Changelog};
qx{tar -c  -P -f - $tkdir | bzip2 -9 >$tkdir.tbz};
print "See $tkdir/Changelog for the most recent changes\n";
#qx{rm -rf $tkdir};
[download]

which will give you a file like

5408955 2007-12-18 13:05 Tk-804.027-10390.tbz
[download]

Enjoy, Have FUN! H.Merijn

In reply to Re: Perl 5.10.0 and Tk 804.027 by Tux
in thread Perl 5.10.0 and Tk 804.027 by g0n

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Clear questions and runnable code get the best and fastest answer
	PerlMonks