Subversion Repositories LCARS

Compare Revisions

Last modification

Regard whitespace Rev 13 → Rev 14

/trunk/tools/network/news/newsstat/newsstat.pl
8,8 → 8,8
## Print out all text to STDOUT UTF-8 encoded
binmode STDOUT, ':encoding(UTF-8)';
 
############################
## newsstat.pl version 0.4.3
##############################
## newsstat.pl version 0.4.3.1
 
###########################################################################
## Collect statistics about a newsgroup (specified by first argument)
812,7 → 812,7
{
my $dirty = shift;
my $clean = $dirty;
$clean =~ s/^\s*|\s*$//g;
$clean =~ s/^\s+|\s+$//g;
 
return $clean;
}