Necesito una funcion PERL para hacer TRIM

[Jorge R Colaccini]

Hola listeros,

Disculpenme lo que voy a preguntar, supongo que en PERL debe ser bastante
elemental, pero como soy novata en este lenguaje, hace horas que estoy
luchando y no puedo resolverlo, asi que recurro a Uds.

Como puedo hacer una funcion similar a la TRIM del BASIC, aquella que me
permite eliminarle los espacios del principio y del final a una cadena de
caracteres?

Ejemplo:
Yo tengo una cadena:

$string="        abc  def 12345        ";

Y quiero borrarle los blancos (espacios) del principio y del fin
conservando los interiores, de tal manera de obtener:
$string="abc  def 12345",

Gracias por anticipado.

----------------------------------------
Jorge R. Colaccini
E-mail: gralpaz@satlink.com
Rosario, Santa Fe, Argentina
----------------------------------------