Index: lib/Parrot/Harness/Smoke.pm
===================================================================
--- lib/Parrot/Harness/Smoke.pm	(revision 37106)
+++ lib/Parrot/Harness/Smoke.pm	(working copy)
@@ -109,6 +109,7 @@
         'Platform'     => $PConfig{osname},
         'SVN Revision' => $PConfig{revision},
         'Version'      => $PConfig{VERSION},
+        'Submitter'    => ($ENV{LOGNAME} || $ENV{USERNAME} || 'unknown'),
     );
 }