#!/usr/bin/perl use strict; use warnings; sub f { print wantarray ? "LIST\n" : defined wantarray ? "SCALAR\n" : "VOI +D\n" } (f); my $foo = (f); my @foo = f; __END__ VOID SCALAR LIST
Abigail
In reply to Re: How to reverse a string *revisited*
by Abigail-II
in thread How to reverse a string *revisited*
by PetaMem
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |