use YAML ();

$items = YAML::Load( <<EOT );
a: 1
b: 1
c: 1
EOT

if( exists $items->{ $variable } ) {
  # . . .
}