sub ding {
    my @foo = ref $_[0] eq "ARRAY" ? @{$_[0]} : ();
    ...
}