Help for this page

Select Code to Download

Select or download this

$s =~ s/^;.*\Z//m; chomp $s;
$s =~ s/^;.*\Z//m; chomp $s;
$s =~ s/^;.*\Z//m; chomp $s;

Select or download this
```
$s =~ s/^;.*\Z//m;
```
Select or download this
```
s/\n;.*\Z//
```