my $one = '$var[ system qw( rm -rf / ) ]';