# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
-package My::Project::netstat;
+package project::netstat::ListItem;
require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
use strict;
use warnings;
+use My::Web;
-our %ListItem=(
- "name"=>"Program name display for <a href=\"http://www.inka.de/sites/lina/linux/NetTools/\">net-tools-1.50</a>/netstat",
- "priority"=>3,
+
+our @ListItem=(
+ "name"=>"netstat -p",
+ "platform"=>"patch",
+ "priority"=>400,
"download"=>"net-tools-1.50-progname.diff.gz",
- "summary"=>"Network tool enhancement",
+ "summary"=>"Program name display for ".a_href('http://www.inka.de/sites/lina/linux/NetTools/','net-tools-1.50').'/netstat',
"license"=>"PD",
"maintenance"=>"accepted",
"language"=>"C patch",
- "description"=>""
- .'<p>After answering several questions on the mailing lists and several from'
- .' my friends personally, I decided that there is missing some tool for GNU/Linux'
- .' which would display PID (or simply the process) of the owner of some socket,'
- .' either listening or communicating.</p>'
+ "description"=><<"HERE",
+<p>After answering several questions on the mailing lists and several from
+my friends personally, I decided that there is missing some tool for GNU/Linux
+which would display PID (or simply the process) of the owner of some socket,
+either listening or communicating.</p>
+HERE
);
1;