This is the revision history for _getarg_perl_array in <matrix.org:#rAnyijhRxzFRfdjSHl:matrix.org>
factoid_id | subject | copula | predicate | author | namespace |
---|---|---|---|---|---|
14908 | _getarg_perl_array | is | `eval use Text::ParseWords; my @words = shellwords(`quote d `arg!!); \@words! ["-s","events","async"] |
simcop2387 | <*:##NULL> |
12746 | _getarg_perl_array | is | `eval use Text::ParseWords; my @words = shellwords(`quote d `arg!!); \@words! Not Available |
simcop2387 | <*:##NULL> |
12685 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/((?:[^\s\\]|\\\s|\\\\)+)/], undef, 1)); [map {s|\\(.)|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12684 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/((?:[^\s\\]|\\ |\\\\)+)/], undef, 1)); [map {s|\\(.)|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12683 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ |\\\\)+/], undef, 1)); [map {s|\\(.)|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12682 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^ ])+/], undef, 1)); [map {s|\\(.)|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12681 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:\\ |\S)+/], undef, 1)); [map {s|\\(.)|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12680 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:\\.|\S)+/], undef, 1)); [map {s|\\(.)|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12676 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ |\\\\)+/], undef, 1)); [map {s|\\(.)|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12675 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ |\\\\)+/], undef, 1)); [map {s|\\([ "'\\])|$1|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12674 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ |\\\\)+/], undef, 1)); [map {s|\\||gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12673 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ )+/], undef, 1)); [map {s|\\||gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12672 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ )+/], undef, 1)); [map {s|\\\\|\\|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12671 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ )+/], undef, 1)); [map {s|\\\\|\|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12670 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr =~ s/\\//gr;}, qr/(?:[^\s\\]|\\ )+/], undef, 1)); \@a! Not Available |
simcop2387 | <*:##NULL> |
12669 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr}, qr/(?:[^\s\\]|\\ )+/], undef, 1)); [map {s|\\\\|\\|gr} @a]! Not Available |
simcop2387 | <*:##NULL> |
12668 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr =~ s/\\//gr;}, qr/(?:[^\s\\]|\\ )+/], undef, 1)); \@a! Not Available |
simcop2387 | <*:##NULL> |
12667 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr =~ s/\\//gr;}, qr/(?:\S|\\ )+/], undef, 1)); \@a! Not Available |
simcop2387 | <*:##NULL> |
12666 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr =~ s/\\//gr;}, qr/(\S|\\ )+/], undef, 1)); \@a! Not Available |
simcop2387 | <*:##NULL> |
12665 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg!!; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =~ s/^['"]|['"]$//gr =~ s/\\//gr;}, qr/\S+/], undef, 1)); \@a! Not Available |
simcop2387 | <*:##NULL> |
12624 | _getarg_perl_array | is | `eval use Text::Balanced qw/extract_multiple extract_delimited/; $in=`quote d `arg~~; @a=(); push @a, $_ while ($_=extract_multiple($in, [sub {extract_delimited($_[0], "'\"") =`eval chr 126~ s/^['"]|['"]$//gr =`eval chr 126~ s/\\//gr;}, qr/\S+/], undef, 1)); \@a~ Not Available |
simcop2387 | <*:##NULL> |