Select Code to Download

for exmple from [[(60)(3)]] i want the 60 and then the 3, one at a tim
+e

my $s = '[[(60)(3)]]';
my @nums = $s =~ /\((\d+)\)/g;