- $weeks = "";
- }
- my $days = $time->{days} % 7;
- $c->reply("$nick has been smoke free for: $weeks $days days $time->{hours} hours and $time->{mins} minutes");
- }else{
- my $nonsmokers = $dbh->prepare(q{SELECT nick FROM last_smokes ORDER BY nick});
- $nonsmokers->execute;
- my @nonsmokers;
- while (my $nonsmoker = $nonsmokers->fetchrow_hashref){
- push @nonsmokers,$nonsmoker->{nick};
+ my $nonsmokers = $dbh->prepare(q{SELECT nick FROM last_smokes ORDER BY nick});
+ $nonsmokers->execute;
+ my @nonsmokers;
+ while (my $nonsmoker = $nonsmokers->fetchrow_hashref){
+ push @nonsmokers,$nonsmoker->{nick};
+ }
+ $c->reply("I keep track of the following ppl: @nonsmokers");