Zeilen auffüllen mit Regex (korrektur)

[seth_not@home]

gudn tach!

$str .= substr($str.'##########', 0, 10);

  
aeh, natuerlich nicht anhaengen, sondern frisch zuweisen:  
  
~~~perl
  
$str = substr($str.'##########', 0, 10);  

mit anhaengen waers wie im anderen beispiel angegeben:

  
$str .= substr('##########', 0, 10 - length $str);  

letzteres ist evtl. wegen weniger string-rumkopiererei schneller.

prost
seth