Help for this page

Select Code to Download


  1. or download this
    <response>
        <version>0.1</version>
    ...
            </observations>
            </history>
    </response>
    
  2. or download this
    #!usr/bin/perl
    
    ...
        printf "%s: %d-%d-%d %d:%d\t", $h->attr('date'),
        $h->look_down(_tag => 'year')->as_text,$h->look_down(_tag => 'mon'
    +)->as_text,$h->look_down(_tag => 'mday')->as_text,$h->look_down(_tag 
    +=> 'hour')->as_text,$h->look_down(_tag => 'min')->as_text;
    }