Help for this page
#!/usr/bin/perl -w ... <0> Class: [1] NetElementObjectClass Instance +: (int) [2] <1> Class: [ 57 ] Vc3TtpSnkObjectClass Instan +ce: (int) [14]
my @numbers = $file_content =~ /\[\s*(\d+)\s*\]/g;