#!/usr/bin/perl 

open FILE, $ARGV[0]  or die "Can't open $ARGV[0] for reading: $!\n";

@file = <FILE>;
close FILE;

@Loglines = split(/\n/,$file);

foreach (@Loglines){
  print "Line: $_\n";
}