Select Code to Download

20150120172947|94|AD-PC40|Area 1|1| | | |4|0| |K-1|L 
20150120172947|95|AD-PC41|Area 1|6| | | |0|0| |K-1|L 
...
20150120172948|116|JR-PC07|Area 6|268435458| | | |0|155| |K0|L 
20150120172948|112|JR-PC10|Area 6|268435461| | | |4|0| |K-1|L 
20150120172948|110|JR-PC13|Area 6|6| | | |0|0| |K-1|L

my ($area1,$area2,$area4);
while (<FH>) {
...
'
          };