and no one found one of the faster methods: my $padded = substr( $in . $c x $pad_len, 0, $pad_len ) ;
uri -- Uri Guttman ------ [EMAIL PROTECTED] -------- http://www.stemsystems.com --Perl Consulting, Stem Development, Systems Architecture, Design and Coding- Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
