Juniper Networks interview question

Remove mutiple blank spaces in a line

Interview Answer

Anonymous

4 Oct 2010

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