Etude de cas pharmacie

#! /usr/bin/perl -w

use warnings;
use strict;

my @n;
my $ccm =<<'FIN';
je veux si possible une etude de cas d'une pharmacie
je veux dire la getion d'une pharmacie , j'ai pas precisé c'est parceque je veux tout ce que vous pouvez me donner sur cette gestion

Gestion de caisse
des clients
des medicaments

tout tout ce que vous voulez , je veux faire un projet global pour une pharmacie

et ja veux que vous m'aider

Merci bien

Configuration: windows XP pro
FIN

if (@n = $ccm =~ /(j[ae]\s*veux)/gi){
        print "@n\n";
        print @n+0," fois\n"
}