Revision 02f0c26cea09e4ea847fba303a856b9475382ba5 authored by Matt Caswell on 05 January 2015, 11:30:03 UTC, committed by Matt Caswell on 22 January 2015, 09:53:07 UTC
This should be a one off operation (subsequent invokation of the script should not move them) This commit is for the 0.9.8 changes Reviewed-by: Tim Hudson <tjh@openssl.org>
1 parent 6f1f3c6
tab_num.pl
#!/usr/local/bin/perl
$num=1;
$width=40;
while (<>)
{
chop;
$i=length($_);
$n=$width-$i;
$i=int(($n+7)/8);
print $_.("\t" x $i).$num."\n";
$num++;
}

Computing file changes ...