also wenn $bes[1] gleich 2 ist, wie in zeile 1 definiert, dann ist:
$waren{$bes[1]}{preis}
gleich
$waren{2}{preis}

und es gibt keinen hashkey "2" in %waren.
was soll denn das ergebnis sein?

ich kann nur erahnen, dass du vielleicht eher das möchtest:
my @bes = qw/ plastik metall holz /;

dann wäre $bes[0] gleich plastik und $bes[1] gleich metall.