Intendi farlo in Perl sui dati provenienti dal form?

Per eliminare TUTTI gli spazi:
s/ //g

Per eliminare solo gli spazi in testa alla stringa:
s/^ +//

per eliminare gli spazi in fondo alla stringa:
s/ +$//

Per eliminare gli spazi in testa e in fondo:
s/^ *(.+) *?/($1)/