Witam mam skrypt perlowy ktory pobiera informacje z mysql i zapisuje je w pliku tekstowym chcial bym dodac warunek danego rekordu bazy skrypt wyglada tak

Kod:

$dbq = $dbase->prepare("SELECT * FROM lms_baroo.tarif WHERE id=1");
$dbq->execute();
open (OUTFILE, "> /home/crontab");

while (my $row = $dbq->fetchrow_hashref()){
my $string = '';
$string .= $row->{'mind'}." ";
$string .= $row->{'hourd'}." ". "* * *"." "."root"." "."/etc/inet/rc.hfsc start"."\n";
$string .= $row->{'minn'}." ";
$string .= $row->{'hourn'}." ". "* * *"." "."root"." "."/etc/inet_noc/rc.hfsc start"."\n";

print OUTFILE $string;
}
close(OUTFILE);
$dbq->finish();

no i procz rekordow mind hourd minn hourn jest jeszcze rekord pole i chcial bym zeby powyzszy skrypt byl wykonywany tylko w tedy kiedy rekord pole ma wartosc yes pomoże ktoś prosze bo sie glowilem w tym a ja niestety z perlem kuleje

Chyba nie te forum

Zapraszam na: http://perlguru.com/