dump osname, archname, useithreads or not.

tokuhirom · Sep 25, 2009 · 8b0249e · 8b0249e
1 parent 76c1174
commit 8b0249e
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/dump-env.pl b/dump-env.pl
@@ -1,7 +1,9 @@
 use Class::MOP;
+use Config;
 
 print "perl: $]\n";
-print $^O, "\n";
+print join(' ', $Config{osname}, $Config{osvers}, $Config{archname}), "\n";
+print "useithreads: ", $Config{useithreads} ? "yes" : "no", "\n";
 print "\n";
 
 d($_) for qw/