Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
use XML::Writer;
...
}

$xml->endTag('xbel');
  2. or download this
    __END__
#!/usr/bin/perl -w
use strict;
...
    else  {print "\n\t" . $equiv{$e} . "=" if exists $equiv{$e}    }
}
sub end {undef $flag}
  3. or download this
    __END__
#!/usr/bin/perl -w
#
...
    return %attrs;
}