>: perl -e 'print qq|$_\n| for q~%MYBOARD{project1|nameofproject1 remarks="Good,Verygood,bext,excellent" grade="7" teacher="Priyanka"}%~=~m/grade="([^"]+).+teacher="([^"]+)/'
7
Priyanka