- or download this
#!/usr/bin/perl -w
use strict;
...
__DATA__
...is your data consisting of the C program...
- or download this
<DTC>
<TroubleCode>1101</TroubleCode>
...
<DirectDegradation>No Action</DirectDegradation>
<Order>PRIMARY</Order>
</DTC>
- or download this
/*XML doc start
<DTC>
...
<Erasability>erasable</Erasability>
</DTC>
XML doc end */
- or download this
/*Perl doc start
=some heading in Perl POD
...
..... lines
=cut
Perl doc end */