Skip to main content
Revision a307eeba84e1a60279e22cef77758af1f78b2bb4 authored by Richard Levitte on 21 March 2001, 21:26:59 UTC, committed by Richard Levitte on 21 March 2001, 21:26:59 UTC
Release OpenSSL 0.9.6a beta2 [engine].
The tag will be OpenSSL-engine-0_9_6a-beta2.
1 parent 1fbc936
Raw File
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++;
	}
back to top