You mean, like:

perl -le 'print $ARGV[1] . ($ARGV[2] x ($ARGV[0] - length($ARGV[1])))'

?

-Bennett

Attachment: pgp00000.pgp
Description: PGP signature

Reply via email to