Fix typo, add stub test and a little more docu.

bin/pt-ioprofile

@@ -678,7 +678,15 @@ See also L<"BUGS"> for more information on filing bugs and getting help.
 =head1 DESCRIPTION
 
 pt-iostats uses strace and lsof to watch a process's IO and print out
-a table of files and I/O activity.
+a table of files and I/O activity.  By default, it watches the mysqld
+process for 30 seconds.  The output is like:
+
+  Tue Dec 27 15:33:57 PST 2011
+  Tracing process ID 1833
+       total       read      write      lseek  ftruncate filename
+    0.000150   0.000029   0.000068   0.000038   0.000015 /tmp/ibBE5opS
+
+You probably need to run this tool as root.
 
 =head1 OPTIONS
 

t/pt-ioprofile/pt-ioprofile.t

@@ -0,0 +1,24 @@
+#!/usr/bin/env perl
+
+BEGIN {
+   die "The PERCONA_TOOLKIT_BRANCH environment variable is not set.\n"
+      unless $ENV{PERCONA_TOOLKIT_BRANCH} && -d $ENV{PERCONA_TOOLKIT_BRANCH};
+   unshift @INC, "$ENV{PERCONA_TOOLKIT_BRANCH}/lib";
+};
+
+use strict;
+use warnings FATAL => 'all';
+use English qw(-no_match_vars);
+use Test::More tests => 1;
+
+use PerconaTest;
+
+TODO: {
+   local $TODO = "Test pt-ioprofile";
+   ok(1, 'ok');
+};
+
+# #############################################################################
+# Done.
+# #############################################################################
+exit;