my $s = shift;