use strict;
use warnings;

##</code><code>##

print "\@all = (",join(',',map { "'$_'" } @all),")\n";