while (<FILE>) {
    ($class, $enrollment) = split(/\s+/,$_);
    print $class;
}

##</code><code>##

( $class, $enrollment ) = split /\s+/ ;