Select Code to Download

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

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