This is a test. Let's go. This is a brand name: 'D&G'. And this is "a test".

##

my $t= XML::Twig->new( 	twig_print_outside_roots => 1,
                              twig_roots	  =>  {'div' => sub {
				           					my ( $t, $e ) = @_;
				           				    print STDOUT $e->text;
				           					$t->purge;
				           					},
				           					'style' => sub {
				           					my ( $t, $e ) = @_;
				           				    $e->print();
				           					$t->purge;
				           					} 
           				},
           				keep_atts_order => 1,
                      );


##

##

my $t= XML::Twig->new( 	twig_print_outside_roots => 1,
                              twig_roots	  =>  {'div' => sub {
				           					my ( $t, $e ) = @_;
				           				    print STDOUT $e->text;
				           					$t->purge;
				           					},
           				},
           				keep_atts_order => 1,
                      );



##

##

´╗┐


        This is a test. Let's go. This is a brand name: 'D&G'. And this is "a test".



##

##

´╗┐


        This is a test. Let's go. This is a brand name: 'D&G'. And this is "a test".