Item no.0:  NameDepth [2]

        <0>   Class: [1] NetElementObjectClass                Instance: (int) [2]
        <1>   Class: [ 57 ] Vc3TtpSnkObjectClass                Instance: (int) [3]
                Item no.1:  NameDepth [2]

        <0>   Class: [1] NetElementObjectClass                Instance: (int) [2]
        <1>   Class: [ 57 ] Vc3TtpSnkObjectClass                Instance: (int) [14]



##</code><code>##

open (FILE, "< logfile") or die "Couldn't open for read logfile: $!";
        while ($file_content = <FILE>) {
                if ( $file_content =~ m/Vc3/ ) {
                        my @numbers = $file_content =~ /\[(\d+)\]/g;

                }
        }
close (FILE);