Help for this page

Select Code to Download


  1. or download this
    <r>
  <ch>
...
    </PortDetails>
  </ch>
</r>
  2. or download this
    my $in  := open { $ARGV[0] } ;
my $out := create RoutingDetails ;
...
}

save :f 'output.xml' $out ;
  3. or download this
    <?xml version="1.0" encoding="utf-8"?>
<RoutingDetails>
...
  <Destination>USMIA</Destination>
  <ETA>2016-10-13</ETA>
</RoutingDetails>
  4. or download this
    ($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,