use XML::Twig;
use strict;
use warnings;


 my $twig=XML::Twig->new();    
  $twig->parsefile( 'CC.xml'); 

my $data   = $twig->first_elt( 'Day' );
my $times   = $twig->first_elt( 'Time' );

my $day = $data->att( 'day-of-week' );
my $time = $times->att('start-time');

if ($day='Tuesday')
{
	print $time;
}