Skip to content

Instantly share code, notes, and snippets.

@churib
Last active August 29, 2015 14:13
Show Gist options
  • Save churib/1a7f4ff4965c954fc241 to your computer and use it in GitHub Desktop.
Save churib/1a7f4ff4965c954fc241 to your computer and use it in GitHub Desktop.
#/usr/bin/env perl
use warnings;
use strict;
use List::Util 'all';
sub foo {
print "before: @_\n";
all { print "in all block: @_\n" } qw( bar );
print "after: @_\n";
}
foo( 1..3 );
__END__
output without debugger
before: 1 2 3
in all block: 1 2 3
after: 1 2 3
output with debugger perl -d
before: 1 2 3
in all block: CODE(0x205ddf8) bar
after: 1 2 3
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment