.include 'cclass.pasm'
.include 'except_severity.pasm'
.include 'except_types.pasm'
.include 'iglobals.pasm'
.include 'interpinfo.pasm'
.include 'iterator.pasm'
.include 'sysinfo.pasm'
.include 'stat.pasm'
.include 'datatypes.pasm'
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_24_1372810529.59012") :anon :lex
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 1
    .const 'Sub' $P5003 = 'cuid_1_1372810529.59012' 
    capture_lex $P5003 
    .const 'Sub' $P5001 = 'cuid_1_1372810529.59012' 
    capture_lex $P5001
    $P5002 = $P5001()
    .return ($P5002) 
.end
.loadlib "nqp_group"
.loadlib "nqp_ops"
.loadlib "perl6_group"
.loadlib "perl6_ops"
.loadlib "bit_ops"
.loadlib "math_ops"
.loadlib "trans_ops"
.loadlib "io_ops"
.loadlib "obscure_ops"
.loadlib "os"
.loadlib "file"
.loadlib "sys_ops"
.loadlib "nqp_bigint_ops"
.loadlib "nqp_dyncall_ops"
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_1_1372810529.59012") :anon :lex :outer("cuid_24_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 1
    .const 'Sub' $P5005 = 'cuid_2_1372810529.59012' 
    capture_lex $P5005 
    .lex "GLOBALish", $P101 
    .lex "EXPORT", $P102 
    .lex "$?PACKAGE", $P103 
    .lex "::?PACKAGE", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "Shell", $P108 
    .lex "$=pod", $P109 
    .lex "!UNIT_MARKER", $P110 
    .local pmc ctxsave 
    find_dynamic_lex $P5004, "$*CTXSAVE"
    set ctxsave, $P5004
    isnull $I5001, ctxsave
    if $I5001 goto unless10_end11 
    can $I5002, ctxsave, "ctxsave"
    perl6_box_int $P5007, $I5002
    set $P5006, $P5007
    unless $I5002 goto if11_end13 
    $P5005 = ctxsave."ctxsave"()
    set $P5006, $P5005
  if11_end13:
  unless10_end11:
    nqp_get_sc_object $P5004, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 114
    .const 'Sub' $P5005 = 'cuid_2_1372810529.59012' 
    capture_lex $P5005
    $P5006 = $P5005()
    nqp_get_sc_object $P5007, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 4
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_2_1372810529.59012") :anon :lex :outer("cuid_1_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 1
    .const 'Sub' $P5025 = 'cuid_6_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_7_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_9_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_13_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_14_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_15_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_16_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_20_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_21_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_22_1372810529.59012' 
    capture_lex $P5025 
    .const 'Sub' $P5025 = 'cuid_23_1372810529.59012' 
    capture_lex $P5025 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$_", $P103 
    .lex "&find", $P104 
    .lex "&cat", $P105 
    .lex "&eqtime", $P106 
    .lex "&rm_f", $P107 
    .lex "&rm_rf", $P108 
    .lex "&touch", $P109 
    .lex "&mv", $P110 
    .lex "&cp", $P111 
    .lex "&mkpath", $P112 
    .lex "&test_f", $P113 
    .lex "&test_d", $P114 
    .lex "&dos2unix", $P115 
    .const 'Sub' $P5002 = 'cuid_6_1372810529.59012' 
    capture_lex $P5002
    $P5002 = $P105."clone"()
    set $P105, $P5002
    .const 'Sub' $P5003 = 'cuid_7_1372810529.59012' 
    capture_lex $P5003
    $P5003 = $P106."clone"()
    set $P106, $P5003
    .const 'Sub' $P5004 = 'cuid_9_1372810529.59012' 
    capture_lex $P5004
    $P5004 = $P107."clone"()
    set $P107, $P5004
    .const 'Sub' $P5005 = 'cuid_13_1372810529.59012' 
    capture_lex $P5005
    $P5005 = $P108."clone"()
    set $P108, $P5005
    .const 'Sub' $P5006 = 'cuid_14_1372810529.59012' 
    capture_lex $P5006
    $P5006 = $P109."clone"()
    set $P109, $P5006
    .const 'Sub' $P5007 = 'cuid_15_1372810529.59012' 
    capture_lex $P5007
    $P5007 = $P110."clone"()
    set $P110, $P5007
    .const 'Sub' $P5008 = 'cuid_16_1372810529.59012' 
    capture_lex $P5008
    $P5008 = $P111."clone"()
    set $P111, $P5008
    .const 'Sub' $P5009 = 'cuid_20_1372810529.59012' 
    capture_lex $P5009
    $P5009 = $P112."clone"()
    set $P112, $P5009
    .const 'Sub' $P5010 = 'cuid_21_1372810529.59012' 
    capture_lex $P5010
    $P5010 = $P113."clone"()
    set $P113, $P5010
    .const 'Sub' $P5011 = 'cuid_22_1372810529.59012' 
    capture_lex $P5011
    $P5011 = $P114."clone"()
    set $P114, $P5011
    .const 'Sub' $P5012 = 'cuid_23_1372810529.59012' 
    capture_lex $P5012
    $P5012 = $P115."clone"()
    set $P115, $P5012
.annotate 'line', 2
    null $P5013
    null $P5014
    null $P5015
    null $P5016
    null $P5017
    null $P5018
    null $P5019
    null $P5020
    null $P5021
    null $P5022
    nqp_get_sc_object $P5023, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 107
    $P5024 = $P5023."clone"()
    perl6_capture_lex $P5024
    .return ($P5024) 
.end
.HLL "perl6"
.namespace []
.sub "cat" :subid("cuid_6_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 4
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_5_1372810529.59012' 
    capture_lex $P5010 
    .lex "@files", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_5_1372810529.59012' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P105, $P5005
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_14
    .lex "RETURN", $P108
.annotate 'line', 5
    $P5008 = "&infix:<,>"($P101)
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 9
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    $P5012 = "&eager"($P5011)
    perl6_decontainerize_return_value $P5007, $P5012
    goto lexotic_15
  lexotic_14:
    .get_results ($P5007)
  lexotic_15:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 7
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_5_1372810529.59012") :anon :lex :outer("cuid_6_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 5
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_4_1372810529.59012' 
    capture_lex $P5004 
    .lex "$f", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_4_1372810529.59012' 
    capture_lex $P5001
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 6
    find_lex $P5006, "&open"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5007 = $P5005($P101)
    nqp_get_sc_object $P5004, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 10
    $P5008 = $P5004($P5007)
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_4_1372810529.59012") :anon :lex :outer("cuid_5_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 6
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5005 = 'cuid_3_1372810529.59012' 
    capture_lex $P5005 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_3_1372810529.59012' 
    capture_lex $P5001
    set $P5003, CALL_SIG
    set $P102, $P5003
    bind_signature 
.annotate 'line', 7
    find_lex $P5006, "$_"
    $P5007 = $P5006."lines"()
    perl6ize_type $P5005, $P5007
    $P5008 = "&infix:<,>"($P5005)
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 11
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    "&eager"($P5011)
.annotate 'line', 10
    find_lex $P5006, "$_"
    $P5007 = $P5006."close"()
    perl6ize_type $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_3_1372810529.59012") :anon :lex :outer("cuid_4_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 7
    .param pmc CALL_SIG :call_sig 
    .lex "$line", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 8
    $P5003 = "&say"($P101)
    .return ($P5003) 
.end
.HLL "perl6"
.namespace []
.sub "eqtime" :subid("cuid_7_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 15
    .param pmc CALL_SIG :call_sig 
    .lex "$source", $P101 
    .lex "$dest", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_16
    .lex "RETURN", $P109
.annotate 'line', 16
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 29
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_17
  lexotic_16:
    .get_results ($P5006)
  lexotic_17:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 28
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "rm_f" :subid("cuid_9_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 19
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_8_1372810529.59012' 
    capture_lex $P5010 
    .lex "@files", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_8_1372810529.59012' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P105, $P5005
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_20
    .lex "RETURN", $P108
.annotate 'line', 20
    $P5008 = "&infix:<,>"($P101)
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 38
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    $P5012 = "&eager"($P5011)
    perl6_decontainerize_return_value $P5007, $P5012
    goto lexotic_21
  lexotic_20:
    .get_results ($P5007)
  lexotic_21:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 36
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_8_1372810529.59012") :anon :lex :outer("cuid_9_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 20
    .param pmc CALL_SIG :call_sig 
    .lex "$f", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 21
    $P5005 = $P101."IO"()
    perl6ize_type $P5004, $P5005
    $P5006 = $P5004."e"()
    perl6ize_type $P5003, $P5006
    unless $P5003 goto if12_else18 
    $P5007 = "&unlink"($P101)
    set $P5009, $P5007
    goto if12_end19
  if12_else18:
    find_lex $P5008, "Nil"
    set $P5009, $P5008
  if12_end19:
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "rm_rf" :subid("cuid_13_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 25
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_12_1372810529.59012' 
    capture_lex $P5010 
    .lex "@files", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_12_1372810529.59012' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P105, $P5005
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_24
    .lex "RETURN", $P108
.annotate 'line', 26
    $P5008 = "&infix:<,>"($P101)
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 47
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    $P5012 = "&eager"($P5011)
    perl6_decontainerize_return_value $P5007, $P5012
    goto lexotic_25
  lexotic_24:
    .get_results ($P5007)
  lexotic_25:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 45
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_12_1372810529.59012") :anon :lex :outer("cuid_13_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 26
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5005 = 'cuid_10_1372810529.59012' 
    capture_lex $P5005 
    .const 'Sub' $P5005 = 'cuid_11_1372810529.59012' 
    capture_lex $P5005 
    .lex "$path", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_10_1372810529.59012' 
    capture_lex $P5001
    .const 'Sub' $P5002 = 'cuid_11_1372810529.59012' 
    capture_lex $P5002
    set $P5003, CALL_SIG
    set $P102, $P5003
    bind_signature 
.annotate 'line', 27
    $P5007 = "&find"($P101 :named("dir"))
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 49
    $P5009 = $P5008."clone"()
    perl6_capture_lex $P5009
    $P5010 = $P5007."map"($P5009)
    perl6ize_type $P5006, $P5010
    $P5011 = $P5006."reverse"()
    perl6ize_type $P5005, $P5011
    $P5012 = "&infix:<,>"($P5005)
    nqp_get_sc_object $P5013, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 53
    $P5014 = $P5013."clone"()
    perl6_capture_lex $P5014
    $P5015 = $P5012."map"($P5014)
    "&eager"($P5015)
.annotate 'line', 30
    $P5005 = "&rmdir"($P101)
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_10_1372810529.59012") :anon :lex :outer("cuid_12_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 27
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    find_lex $P5005, "$_"
    $P5006 = $P5005."Str"()
    perl6ize_type $P5004, $P5006
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_11_1372810529.59012") :anon :lex :outer("cuid_12_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 27
    .param pmc CALL_SIG :call_sig 
    .lex "$f", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 28
    $P5005 = $P101."IO"()
    perl6ize_type $P5004, $P5005
    $P5006 = $P5004."d"()
    perl6ize_type $P5003, $P5006
    unless $P5003 goto if13_else22 
    $P5007 = "&rmdir"($P101)
    set $P5009, $P5007
    goto if13_end23
  if13_else22:
    $P5008 = "&unlink"($P101)
    set $P5009, $P5008
  if13_end23:
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "touch" :subid("cuid_14_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 34
    .param pmc CALL_SIG :call_sig 
    .lex "@files", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_26
    .lex "RETURN", $P108
.annotate 'line', 35
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 29
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_27
  lexotic_26:
    .get_results ($P5006)
  lexotic_27:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 63
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mv" :subid("cuid_15_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 38
    .param pmc CALL_SIG :call_sig 
    .lex "@args", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_28
    .lex "RETURN", $P108
.annotate 'line', 39
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 29
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_29
  lexotic_28:
    .get_results ($P5006)
  lexotic_29:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 68
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "cp" :subid("cuid_16_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 42
    .param pmc CALL_SIG :call_sig 
    .lex "@args", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_30
    .lex "RETURN", $P108
.annotate 'line', 43
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 29
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_31
  lexotic_30:
    .get_results ($P5006)
  lexotic_31:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 73
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mkpath" :subid("cuid_20_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 46
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_19_1372810529.59012' 
    capture_lex $P5010 
    .lex "@paths", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_19_1372810529.59012' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P105, $P5005
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_34
    .lex "RETURN", $P108
.annotate 'line', 47
    $P5008 = "&infix:<,>"($P101)
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 80
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    $P5012 = "&eager"($P5011)
    perl6_decontainerize_return_value $P5007, $P5012
    goto lexotic_35
  lexotic_34:
    .get_results ($P5007)
  lexotic_35:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 78
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_19_1372810529.59012") :anon :lex :outer("cuid_20_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 47
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5005 = 'cuid_17_1372810529.59012' 
    capture_lex $P5005 
    .const 'Sub' $P5005 = 'cuid_18_1372810529.59012' 
    capture_lex $P5005 
    .lex "$name", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_17_1372810529.59012' 
    capture_lex $P5001
    .const 'Sub' $P5002 = 'cuid_18_1372810529.59012' 
    capture_lex $P5002
    set $P5003, CALL_SIG
    set $P102, $P5003
    bind_signature 
.annotate 'line', 48
    nqp_get_sc_object $P5010, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 81
    $P5011 = $P101."split"($P5010)
    perl6ize_type $P5009, $P5011
    nqp_get_sc_object $P5012, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 82
    $P5013 = $P5012."clone"()
    perl6_capture_lex $P5013
    $P5014 = $P5009."map"($P5013)
    perl6ize_type $P5008, $P5014
    $P5015 = "&infix:<,>"($P5008)
    find_lex $P5005, "&infix:<~>"
    nqp_get_sc_object $P5006, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 86
    $P5007 = "&METAOP_REDUCE_LEFT"($P5005, $P5006 :named("triangle"))
    $P5016 = $P5007($P5015)
    $P5017 = "&infix:<,>"($P5016)
    nqp_get_sc_object $P5018, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 87
    $P5019 = $P5018."clone"()
    perl6_capture_lex $P5019
    $P5020 = $P5017."map"($P5019)
    $P5021 = "&eager"($P5020)
    .return ($P5021) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_17_1372810529.59012") :anon :lex :outer("cuid_19_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 48
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    find_lex $P5006, "$_"
    $P5007 = $P5006."Stringy"()
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 81
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5009 = $P5004($P5007, $P5008)
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_18_1372810529.59012") :anon :lex :outer("cuid_19_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 48
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 49
    find_lex $P5006, "$_"
    $P5007 = $P5006."IO"()
    perl6ize_type $P5005, $P5007
    $P5008 = $P5005."d"()
    perl6ize_type $P5004, $P5008
    if $P5004 goto unless14_else32 
    find_lex $P5011, "$_"
    find_lex $P5010, "&mkdir"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5012 = $P5009($P5011)
    set $P5014, $P5012
    goto unless14_end33
  unless14_else32:
    find_lex $P5013, "Nil"
    set $P5014, $P5013
  unless14_end33:
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "test_f" :subid("cuid_21_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 54
    .param pmc CALL_SIG :call_sig 
    .lex "$file", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_36
    .lex "RETURN", $P108
.annotate 'line', 55
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 29
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_37
  lexotic_36:
    .get_results ($P5006)
  lexotic_37:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 97
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "test_d" :subid("cuid_22_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 58
    .param pmc CALL_SIG :call_sig 
    .lex "$file", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_38
    .lex "RETURN", $P108
.annotate 'line', 59
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 29
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_39
  lexotic_38:
    .get_results ($P5006)
  lexotic_39:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 102
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "dos2unix" :subid("cuid_23_1372810529.59012") :anon :lex :outer("cuid_2_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
.annotate 'line', 62
    .param pmc CALL_SIG :call_sig 
    .lex "$file", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_40
    .lex "RETURN", $P108
.annotate 'line', 63
    nqp_get_sc_object $P5009, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 29
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_41
  lexotic_40:
    .get_results ($P5006)
  lexotic_41:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 107
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_26_1372810529.59012") :load :init
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
    .const 'Sub' $P5001 = 'cuid_25_1372810529.59012' 
    capture_lex $P5001 
    .local pmc cur_sc 
    .local pmc conflicts 
    nqp_dynop_setup 
    nqp_bigint_setup 
    nqp_native_call_setup 
    rakudo_dynop_setup 
    getinterp $P5001
    get_class $P5002, "LexPad"
    get_class $P5003, "Perl6LexPad"
    $P5001."hll_map"($P5002, $P5003)
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    .const 'Sub' $P5001 = "cuid_24_1372810529.59012" 
    get_hll_global $P5002, "ModuleLoader"
    $P5003 = $P5002."load_setting"("CORE")
    $P5001."set_outer_ctx"($P5003)
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    get_hll_global $P5001, "ModuleLoader"
    $P5001."load_module"("File::Find", 2 :named("line"))
    nqp_create_sc $P5001, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D"
    set cur_sc, $P5001
    cur_sc."set_description"("/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm")
    new $P5002, 'ResizablePMCArray'
    set conflicts, $P5002
    new $P5003, 'ResizableStringArray'
    null $S5001
    push $P5003, $S5001
    push $P5003, "Uninstantiable"
    push $P5003, "25B76D5348C2A22A9722D68A7288B5D268CF8F4E-1372810229.31343"
    push $P5003, "src/gen/Metamodel.pm"
    push $P5003, "GLOBALish"
    push $P5003, "EXPORT"
    push $P5003, "$?PACKAGE"
    push $P5003, "::?PACKAGE"
    push $P5003, "Shell"
    push $P5003, "$=pod"
    push $P5003, "!UNIT_MARKER"
    push $P5003, "5C7C172868FA9510BA84BFF074E73D635E54D9D3"
    push $P5003, "src/gen/CORE.setting"
    push $P5003, "&find"
    push $P5003, "2237BEBDC8C16AF3957C1826B87C27FBC33D345E"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/File/Find.pm"
    push $P5003, "&cat"
    push $P5003, "&eqtime"
    push $P5003, "&rm_f"
    push $P5003, "&rm_rf"
    push $P5003, "&touch"
    push $P5003, "&mv"
    push $P5003, "&cp"
    push $P5003, "&mkpath"
    push $P5003, "&test_f"
    push $P5003, "&test_d"
    push $P5003, "&dos2unix"
    push $P5003, "@files"
    push $P5003, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453"
    push $P5003, "src/gen/BOOTSTRAP.pm"
    push $P5003, "$line"
    push $P5003, "$_"
    push $P5003, "$f"
    push $P5003, "&?ROUTINE"
    push $P5003, "Stub code executed"
    push $P5003, "$source"
    push $P5003, "$dest"
    push $P5003, "dir"
    push $P5003, "$path"
    push $P5003, "@args"
    push $P5003, "@paths"
    push $P5003, "/"
    push $P5003, "1"
    push $P5003, "$name"
    push $P5003, "$file"
    push $P5003, "GLOBAL"
    push $P5003, "File"
    push $P5003, "ALL"
    push $P5003, "DEFAULT"
    push $P5003, "Shell::Command"
    push $P5003, "Command"
    .const 'Sub' $P5004 = 'cuid_25_1372810529.59012' 
    capture_lex $P5004
    $P5005 = $P5004()
    nqp_deserialize_sc "[encoded data, 11648 characters]", cur_sc, $P5003, $P5005, conflicts
    unless conflicts goto if15_end43 
    get_hll_global $P5006, "ModuleLoader"
    $P5007 = $P5006."resolve_repossession_conflicts"(conflicts)
  if15_end43:
    .const "LexInfo" $P5001 = "cuid_1_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 2
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_2_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 6
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_3_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 11
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_4_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 10
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_5_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 9
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_6_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 23
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_6_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 7
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_7_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 35
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_7_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 28
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_8_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 38
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_9_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 44
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_9_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 36
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_10_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 49
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_11_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 53
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_12_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 47
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_13_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 62
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_13_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 45
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_14_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 67
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_14_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 63
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_15_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 72
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_15_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 68
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_16_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 77
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_16_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 73
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_17_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 82
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_18_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 87
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_19_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 80
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_20_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 96
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_20_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 78
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_21_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 101
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_21_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 97
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_22_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 106
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_22_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 102
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_23_1372810529.59012"
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 111
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_23_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 107
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_2_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 113
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_1_1372810529.59012" 
    nqp_get_sc_object $P5002, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 3
    perl6_associate_sub_code_object $P5001, $P5002
    nqp_get_sc_object $P5001, "DD4ED2B22BF4CB11911FBF87DFD732462CF3952D", 0
    set_hll_global "GLOBAL", $P5001
    .return () 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_25_1372810529.59012") :anon :lex :outer("cuid_26_1372810529.59012")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
    new $P5001, 'ResizablePMCArray'
    .const 'Sub' $P5002 = "cuid_3_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_4_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_5_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_6_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_7_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_8_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_9_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_10_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_11_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_12_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_13_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_14_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_15_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_16_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_17_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_18_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_19_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_20_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_21_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_22_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_23_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_2_1372810529.59012" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_1_1372810529.59012" 
    push $P5001, $P5002
    .return ($P5001) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_27_1372810529.59012") :load
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Shell/Command.pm"
    .const 'Sub' $P5001 = "cuid_24_1372810529.59012" 
    $P5002 = $P5001()
    .return ($P5002) 
.end