$s =~ /x/; 
$s =~ /x/; 
$s =~ /x/; 
$s =~ /x/; 
$s =~ /x/;