while(<>) { next unless /^-+\[[^\]]+\]-*\|-*\[[^0-9]+([^\]]+)\]/; print "$1\n"; }