You're close; split returns a list. You want something more like:

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

Update: Also, the $_ is implied, so you can just write:

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

_______________
D a m n D i r t y A p e
Home Node | Email