{
    local $/;#makes the separator variable undef
    #thus preventing perl from seeing \n as line separators
    while(<$fh>){
        $var = $_;
    }
}