my @vars = split(/;/, $line);