#include “stdafx.h”
using namespace System;
using namespace System::Collections;
/*
Exemple de Tableau Associatif.
#include “stdafx.h”
using namespace System;
using namespace System::Collections;
/*
Exemple de Tableau Associatif.
// Vérifier si la clé "fr" existe dans le hashTable Console::Write("Fr existe-il? {0}", hash->Contains("fr")); |
char* getString(char *buffer, char end_char); int main() { char buffer[MAX_SIZE]; int i = 0; printf("Taper une chaîne de caractères qui se termine par deux points: "); getString(buffer, ':'); printf(": %s ", buffer); }
for $href ( @myArraysHash ) { print "{ "; for $role ( keys %$href ) { print "$role=$href->{$role} "; } |
$dir = “c:/”;
print “Voici les fichier textes de $dir:\n”;
#!/usr/local/bin/perl
opendir(BIN, $dir) or die
la somme de tous les fichiers des répertoires et sous répertoires my $somme_octet = 0; find sub { $somme_octet += -s }, |
sub lePlusGrand { return unless -f && -s _ > $taille_fichier; $taille_fichier = -s _; $nom_fichier = $File::Find::name; |
@reverse_lines = reverse @lines;
print @reverse_lines;
#!/usr/bin/perl ?Cw use Win32::Clipboard; my $presse_p = Win32::Clipboard->new(); # Enregistrer l |
#!/usr/bin/perl -w use Win32::OLE; use strict; # création d'un objet OLE sur MS Excel my $xls_app |