Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
my @parts = map {/(\w+)\s*$/; $1} split /\s*,\s*/, $1;

print "SELECT ", join (', ', @parts), " FROM\n";

Select or download this
```
SELECT x1, f2, f3, x2, x3 FROM
```