Lines Matching full:foo*
92 foreach $foo (@_) {
93 $max = $foo if $max < $foo;
126 $Foo{$key} = $value unless $Foo{$key};
192 &foo(1,2,3); # pass three arguments
193 foo(1,2,3); # the same
195 foo(); # pass a null list
196 &foo(); # the same
198 &foo; # foo() get current args, like foo(@_) !!
199 foo; # like foo() IFF sub foo predeclared, else "foo"
222 my $foo; # declare $foo lexically local
224 my $foo = "flurp"; # declare $foo lexical, and init it
226 my $x : Foo = $y; # similar, with an attribute applied
280 my ($foo) = <STDIN>; # WRONG?
281 my @FOO = <STDIN>;
285 my $foo = <STDIN>;
289 my $foo, $bar = 1; # WRONG
293 my $foo;
479 local $foo; # make $foo dynamically local
481 local $foo = "flurp"; # make $foo dynamic, and init it
528 local($foo) = <STDIN>;
529 local @FOO = <STDIN>;
533 local $foo = <STDIN>;
558 sub f { local $_ = "foo"; print }
715 with a star: C<*foo>. This is often known as a "typeglob", because the
730 doubleary(*foo);
849 @common = inter( \%foo, \%bar, \%joe );
951 on subroutine references like C<\&foo> or on indirect subroutine
976 sub mygrep (&@) mygrep { /foo/ } $a, $b, $c
1016 sub foo (*) {
1100 func(@foo);
1104 argument, which can be more than a bit surprising. The old C<@foo>
1107 in C<@foo>. And the C<split> gets called in scalar context so it
1138 sub FOO_SET () { 1 if FLAG_MASK & FLAG_FOO }
1143 sub foo_set () { if (FLAG_MASK & FLAG_FOO) { 1 } }
1243 package Foo;
1244 use REGlob 'glob'; # override glob() in Foo:: only
1279 C<require> replacement as C<require Foo::Bar>, it will actually receive
1280 the argument C<"Foo/Bar.pm"> in @_. See L<perlfunc/require>.
1358 sub fnord (&\%) : switch(10,foo(7,3)) : expensive ;
1364 sub fnord : switch(10,foo() ; # ()-string not balanced
1368 sub snurt : foo + bar ; # "+" not a colon or space