Help for this page

Select Code to Download

Select or download this

$w = "host, my-host-name   # My Host Name";

Select or download this
```
($x) = $w =~ /^host,\s*(\w+)\s*/;
```

Select or download this

($x) = $w =~ /^host,\s*(\w+-\w+-\w+)\s*/;