or download this
perl -e "@trace=`tracert -w 200 -p 30 perlmonks.org`;foreach $i (@trac
+e){print \"$i\n\";}"
-p is not a valid command option.
Usage: tracert [-d] [-h maximum_hops] [-j host-list] [-w timeout] targ
+et_name
...
-h maximum_hops Maximum number of hops to search for target.
-j host-list Loose source route along host-list.
-w timeout Wait timeout milliseconds for each reply.