Help for this page

Select Code to Download

Select or download this

my $s = "hi, how are you?";
my $s2 = ($s =~ s/,.*//gr);

print "$s2 \n$s\n";

Select or download this
```
__OUTPUT__
hi
hi, how are you?
```