--- ps2rrd.pl	2009/07/17 16:41:12	13
+++ ps2rrd.pl	2009/07/17 18:35:34	14
@@ -34,7 +34,8 @@
 
 	my $t = mktime( 0, $5, $4, $3, $2 - 1, $1 - 1900 ) if $file =~ m{(\d\d\d\d)-(\d\d)-(\d\d)/(\d\d)(\d\d)};
 
-	warn "# $file ", -s $file, " bytes [$t]\n" if $debug;
+#	warn "# $file ", -s $file, " bytes [$t]\n" if $debug;
+	print STDERR "\n$file\t";
 
 	my $cols = <$fh>;
 	$cols =~ s/^\s+//;
@@ -60,7 +61,7 @@
 
 		my $veid = c('VEID');
 		next if defined $only_veid && $only_veid != $veid;
-		$veid =~ s/^0$/0-hw/;
+		$veid =~ s/^0$/_hw_0/;
 
 		my $s = c('VSZ');
 		my $cmd = c('COMMAND');