Help for this page
Select Code to Download
Select
or
download this
my $sigil= ($name =~ s/^([$@%&<*])//) ? $1 : '&';