does perl has switch case like in C??

Does perl has switch case like C++?
Next,
how do i store all these data that i have extracted into an array??
the data that I have extracted are
XB8B_Bmodule_MFB1_VT_Vt!MOSFET
XB8B_Bmodule_MFB2_VT_Vt!MOSFET
XB8B_Bmodule_MFB3_VT_Vt!MOSFET

The data are not fixed and they are extracted from a file

The source data is as follows where I have extracted the data from:

XB8B_Bmodule_MFB1_VT_Vt!MOSFET 10/1.5!R!V!+2.484027E+00!+2.486840E+00!+2.494738E+00!+2.481826E+00!+2.498665E+00
XB8B_Bmodule_MFB2_VT_Vt!MOSFET 10/1.6!R!V!+2.484340E+00!+2.491077E+00!+2.480577E+00!+2.475777E+00!+2.482094E+00
XB8B_Bmodule_MFB3_VT_Vt!MOSFET 10/1.8!R!V!+2.484071E+00!+2.479939E+00!+2.477249E+00!+2.475705E+00!+2.480875E+00
XB8B_Bmodule_MFB4_VT_Vt!MOSFET 10/5!R!V!+2.475608E+00!+2.492663E+00!+2.495399E+00!+2.497997E+00!+2.496347E+00
XB8B_Bmodule_MFB5_VT_Vt!MOSFET 5/5!R!V!+2.489002E+00!+2.488641E+00!+2.478360E+00!+2.486249E+00!+2.481316E+00