Changeset 195 in lab


Ignore:
Timestamp:
Jan 25, 2013 8:03:09 PM (11 years ago)
Author:
mitty
Message:
  • add "#" to STDERR output
Location:
trunk/misc
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/misc/findcombinable.pl

    r194 r195  
    2929    my $target = shift @_; 
    3030     
    31     print STDERR "checking '$target'\n"; 
     31    print STDERR "# checking '$target'\n"; 
    3232    opendir(my $dir, $target) || return $target; 
    3333    my @entries = sort grep { !m/^(\.|\.\.)$/g } readdir($dir); 

  • trunk/misc/findnonsjis.pl

    r193 r195  
    2828    my $target = shift @_; 
    2929     
    30     print STDERR "checking '$target'\n"; 
     30    print STDERR "# checking '$target'\n"; 
    3131    opendir(my $dir, $target) || return $target; 
    3232    my @entries = sort grep { !m/^(\.|\.\.)$/g } readdir($dir); 
Note: See TracChangeset for help on using the changeset viewer.