my $s1  = 'X -4 Y 3 Z';