fgabolde

#!start included /usr/share/perl/5.8/ExtUtils/MANIFEST.SKIP
# Avoid version control files.
\bRCS\b
\bCVS\b
\bSCCS\b
,v$
\B\.svn\b
\B\.git\b
\B\.gitignore\b

fgabolde

#!/usr/bin/env perl

use strict;
use warnings;

use Data::Dumper;

my $toggle = 0;
my $handler_for_some_sig = sub { my $sig_name = shift; print "hey we caught $sig_name\n"; $toggle++; };