Help for this page

Select Code to Download

Select or download this

my $xml = XMLin( 'CC.xml', ( ForceArray => 1 ) );
for my $day (@{ $xml->{Week}[0]{Day} }) {
...
    print $time->{'start-time'},"\n" if exists $time->{'start-time'};
  }
}