in reply to Not printing the values outside the while loop
Each time through the loop you replace the contents of all the variables regardless if matching the relevant text. For input lines that contain less than all the search strings at least some of the variables will be empty.
Optimising for fewest key strokes only makes sense transmitting to Pluto or beyond
In Section
Seekers of Perl Wisdom