ubuntuusers.de

Ich habe bis morgen ein wichtiges projekt zu beenden. bin fast fertig. Alles was mir fehlt ist eine perl-if-abfrage die etwa "wenn in $gehalt nur zahlen sind" aussagen soll. nur mir ist entfallen wie das geht. kann mir wer helfen?

rorschach@localhost:~/Desktop$ cat check_num.pl 
#!/usr/bin/env perl

use warnings;
use strict;

my $gehalt=$ARGV[0];

if ( $gehalt =~ /^\d+$/) {
	print("In $gehalt sind nur Zahlen.\n");
}else{
	print("In $gehalt sind nicht nur Zahlen.\n");
}
rorschach@localhost:~/Desktop$ ./check_num.pl 1234
In 1234 sind nur Zahlen.
rorschach@localhost:~/Desktop$ ./check_num.pl 12d34
In 12d34 sind nicht nur Zahlen.
rorschach@localhost:~/Desktop$ ./check_num.pl 1234gh
In 1234gh sind nicht nur Zahlen.