etc/services - sync with NetBSD-8
[minix.git] / crypto / external / bsd / openssl / dist / util / tab_num.pl
bloba81ed0edc2452ce7b1ae9adc857c187e1ca01de9
1 #!/usr/local/bin/perl
3 $num=1;
4 $width=40;
6 while (<>)
8 chop;
10 $i=length($_);
12 $n=$width-$i;
13 $i=int(($n+7)/8);
14 print $_.("\t" x $i).$num."\n";
15 $num++;