&sub qw(1 2);

[QoS]

Hi,

How come this works:

&ezmenu qw(
++ Action Lookup Cancel -- Exit
++ Edit Cut Copy Paste
++ Logfile View Save -- Clear
++ Options Font Color
++ Help Help About
);

But this produces syntax error:

ezmenu qw(
++ Action Lookup Cancel -- Exit
++ Edit Cut Copy Paste
++ Logfile View Save -- Clear
++ Options Font Color
++ Help Help About
);

Is this a feature of using & vs invoking a sub without & ?

Thanks,

Jason

 

[Tad J McClellan]

How come this works:

&ezmenu qw(
++ Action Lookup Cancel -- Exit
++ Edit Cut Copy Paste
++ Logfile View Save -- Clear
++ Options Font Color
++ Help Help About
);

But this produces syntax error:

ezmenu qw(
++ Action Lookup Cancel -- Exit
++ Edit Cut Copy Paste
++ Logfile View Save -- Clear
++ Options Font Color
++ Help Help About
);

Is this a feature of using & vs invoking a sub without & ?

Kinda sorta.

If you want to omit the ampersand and omit parenthesis, then you must
pay attention to this from perlsub:

NAME LIST; # Parentheses optional if predeclared/imported.

You have omitted the parenthesis but you have NOT predeclared/imported.

Either pre_define_ ezmenu() before you call it:

sub ezmenu {
# do stuff
}
...
ezmenu qw( ... );

or, pre_declare_ ezmenu() before you call it:

sub ezmenu;
...
ezmenu qw( ... );
...
sub ezmenu {
# do stuff
}

or, don't omit the parenthesis:

ezmenu (qw( ... ));

but in that case, I'd chose some qw delimiter other than parens:

ezmenu (qw/ ... /);

 

[QoS]

Kinda sorta.

If you want to omit the ampersand and omit parenthesis, then you must
pay attention to this from perlsub:

NAME LIST; # Parentheses optional if predeclared/imported.

You have omitted the parenthesis but you have NOT predeclared/imported.

Either pre_define_ ezmenu() before you call it:

sub ezmenu {
# do stuff
}
...
ezmenu qw( ... );

or, pre_declare_ ezmenu() before you call it:

sub ezmenu;
...
ezmenu qw( ... );
...
sub ezmenu {
# do stuff
}

or, don't omit the parenthesis:

ezmenu (qw( ... ));

but in that case, I'd chose some qw delimiter other than parens:

ezmenu (qw/ ... /);

So there is a way to do this without an ampersand; that is great, thank you.