foreach ( /(\[.*?\])/g ) {
	print $1;
	print "\n";
}