Help for this page
my $id = @_;
my ($id) = @_; my $id = $_[0]; my $id = shift;
sub do_something { ... }
$subref = \&do_something;