Skip to content

Instantly share code, notes, and snippets.

View Code-Hex's full-sized avatar
:shipit:
Go Travel

Kei Kamikawa Code-Hex

:shipit:
Go Travel
420 followers · 63 following
View GitHub Profile
@riywo
riywo / gist:879661
Created March 21, 2011 15:49
fork & exec with Perl
use strict;
use warnings;
use IO::Handle;
sub fork_exec {
my @args = @_;
my $handles = [];
if (ref($args[$#args]) eq 'GLOB') {
my $stdin = pop @args;