foreach my $key (keys %Movement) {
 $foo->can($Movement{$key})->($foo);
}

# Update: this works too:
$foo->${\$Movement{$key}};