open FILE, "Sample.java";
my @lines = <FILE>;
close FILE;
foreach my $str (@lines){print $str};