Je fais un petit projet de datamining où un script perl récupère des informations d'une base de données SQL et les analyse. Les données sont composées de plusieurs horodatages. Je veux trouver combien d'un type particulier d'horodateur existe un jour particulier. Malheureusement, c'est mon premier script perl, et la nature de perl quand il s'agit de hachages et de tableaux me déroute pas mal.Nouvel utilisateur Perl: utilisation d'un hachage de tableaux
segment de code:
my %values=();#A hash of the total values of each type of data of each day.
#The key is the day, and each key stores an array of each of the values I need.
my @proposal;
#[drafted timestamp(0), submitted timestamp(1), attny approved timestamp(2),Organiziation approved timestamp(3), Other approval timestamp(4), Approved Timestamp(5)]
while(@proposal=$sqlresults->fetchrow_array()){
#TODO: check to make sure proposal is valid
#Increment the number of timestamps of each type on each particular date
my $i;
for($i=0;$i<=5;$i++)
$values{$proposal[$i]}[$i]++;
#Update rolling average of daily
#TODO: To check total load, increment total load on all dates between attourney approve date and accepted date
for($i=$proposal[1];$i<=$proposal[2];$i++)
$values{$i}[6]++;
}
Je continue de recevoir des erreurs de syntaxe dans la boucle pour les valeurs incrémenter. Aussi, étant donné que j'utilise strict et les avertissements, Perl va-t-il automatiquement créer des tableaux de bonnes valeurs quand j'y accède à l'intérieur du hachage, ou est-ce que j'obtiendrai des erreurs hors-limites partout?
Merci pour toute aide, Zach
Est-ce que ce code compile? 'for (...) STATEMENT' est normalement une erreur dans Perl. Les accolades sont obligatoires - il faut que ce soit 'for (...) {STATEMENT}' – mob