#Perl 5.10, 22 bytes
Perl 5.10, 22 bytes
21 bytes + 1 byte for -a flag.
Since the regex-based expression was done... :p
The input values for the array must be separated by a space.
$n++while pop@F;say$n
#Perl 5.10, 22 bytes
21 bytes + 1 byte for -a flag.
Since the regex-based expression was done... :p
The input values for the array must be separated by a space.
$n++while pop@F;say$n
Perl 5.10, 22 bytes
21 bytes + 1 byte for -a flag.
Since the regex-based expression was done... :p
The input values for the array must be separated by a space.
$n++while pop@F;say$n
#Perl 5.10, 22 bytes
21 bytes + 1 byte for -a flag.
Since the regex-based expression was done... :p
The input values for the array must be separated by a space.
$n++while pop@F;say$n