my($scheck, $echeck);
while(<FILE1>) {
    chomp;
    ($scheck, $echeck) = split;   # or whatever.
}
close(FILE1);    # Be tidy.