$::flag = 0;
open USERS, '../../xml_final/users/users.xml' or die "Could not open users.xml: $!";
flock(USERS, LOCK_SH);
    my $parser = new XML::Parser();
    $parser->setHandlers(
        Start => \&start_handler,
        Char  => \&char_handler);

    my $document = $parser->parse(\*USERS);
close USERS;