Question d’entretien chez Juniper Networks

Remove mutiple blank spaces in a line

Réponse à la question d'entretien

Utilisateur anonyme

4 oct. 2010

#!/usr/bin/perl my $line = "foo bar car nar far" ; print $line , "\n" ; $line =~ s/\s+//g; print $line , "\n" ;