diff options
Diffstat (limited to 'Bugs/clearmyarray')
| -rw-r--r-- | Bugs/clearmyarray | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Bugs/clearmyarray b/Bugs/clearmyarray new file mode 100644 index 0000000000..e4aecb32ab --- /dev/null +++ b/Bugs/clearmyarray @@ -0,0 +1,4 @@ +@a = ( 5, 6, 7, 8); +&foo(1, 2, @a); + +sub foo { my($a, $b, @c) = @_; print scalar(@c), "\n"; } |