$sch = <STDIN>;
chomp($sch);