User Eingabe mit RegExp überprüfen

[Schnaps]

Servus

Ich habe eine usereingabe die ich überprüfen muß.
Sie darf nur aus einer zahl oder einem Stern bestehen.

ich sitze schon zu lange vor dem rechner, komm einfach nicht drauf.

hier mein Code

##########################################################################
##               Ließt und überprüft die Startpunkt Eingabe             ##
sub start {
##########################################################################
print "\n\n\033\1331mSTARTPOSITION:\033\1330m";
  $start=<>;
     chomp $start;

unless ($start=~/\d*\*/) {
  print "\n\033\1331mBitte eine Zahl kleiner $length oder * eingeben\033\1330m";
  start();
  }

$start =0 if $start eq '*';

}

Vielen Dank schon mal für eure mühe!

MFG
Schnaps