Software-OK
≡... News | ... Home | ... FAQ | Impressum | Kontakt | Gelistet bei | Danke |

  
HOME ► Windows Tip - Perl ► «««« 02 / 02 »»»»

Perl Zufall String ohne Zusatz Module!!


Recht einfach kann man in Perl Zufalls-String ohne Zusatz Module generieren, hier ein schlichtes kostenloses Beispiel!




Die Rutine (Unterfunktion) &RandStr(12); generier 12 Zeichen langen Zufalls String (Wort) aus den Zeichen:

0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ



#!/usr/bin/perl
use strict;
use CGI::Carp qw(fatalsToBrowser);

#START
print "Content-type: text/html\n\n";

my $string1="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";
my @RA=split("",$string1);

#Zufalls String Rutine
sub RandStr()
{
#Für die Rückgabe vom String
my $str="";
#Lenge vom Zufalls String
my $len=$_[0];
#Anzahl der Zeichen
my $cnt=@RA;

for (my $i=0;$i<$len;$i++)
{
#Zufallszeichen generieren
my $random_nummer=int(rand($cnt));

#Zufallszeichen zum gesamt String hinzufügen
$str.=$RA[$random_nummer];

}
return $str;
}
#Zufalls String Rutine-Ende


#Test Schleife

for(my $i=0;$i<1000;$i++)
{
my $ppp=&RandStr(12);
$ppp=sprintf("%02d %s",$i,$ppp);
print "$ppp
";
}





Aktualisiert am: 18 Juni 2022 03:14 Windows
Keywords: perl, zufalls, string, ohne, zusatz, module, einfach, zufall, generieren, schlichtes, kostenloses, beispiel


Ähnliche Informationen auf der Seite

Windows

... Papierkorb löschen mit und ohne Bestätigung auf Windows 11?


Einfach das Dialog zur Bestätigung des Löschvorgangs auf neuem Microsoft Windows 11 aktivieren, oder deaktivieren   Öffnen Sie den Papierkorb von Windows
Windows

... So installieren Sie Windows 10 ohne Bloatware einfach neu


Es ist einfach das MS Windows 10 OS ohne Bloatware einfach neu zu installieren Jeder weiss inzwischen was Bloatware ist. Um die Bloatware für ein sauberes,
Windows

... Ohne Unterordner in der Datei Explorer Suche suchen Windows 10


Unter MS Windows 10 ist es einfach, die Suche mit und ohne Unterordner im Datei Explorer zu starten Tipp ► Ohne und mit Unterordner in Windows 11 Ein Beispiel:
Windows

... Trim string in cpp?


Mit eigenem Trim String in cpp einfach Zeichenfolgen individuell Kürzen //////////////////////////////////////////////////////////////////////// // // Mit
Windows

... Löschen von Daten ohne Dateiendung in allen Unterordnern


Es ist einfach, das Löschen von Daten ohne Dateiendung in allen Unterordnern aus der Adresszeile heraus auf Windows 11, 10, und MS Server Inhalt: 1.
Windows

... Zufalls Toto-Gewinnzahlen für die nächste Ziehung


Um Zufalls Toto-Gewinnzahlen für die nächste Ziehung zu generieren, einfach auf das TOTO Button klicken Info: Sie können dieses Tool nutzen, um Zufalls
Windows

... Mit einem Favoriten starten, ohne *.qdr zu registrieren?


Mit einem Favoriten starten, ohne *.qdr zu registrieren kann man recht einfach realisieren auf alle Windows Desktop und Server Betriebssystemen z.B. mit



▲ Zum Anfang ▲


Windows

... Perl Zufall String ohne Zusatz Module


Recht einfach kann man in Perl Zufalls-String ohne Zusatz Module generieren, hier ein schlichtes kostenloses Beispiel Die Rutine Unterfunktion &RandStr12; generier
Windows

... Mit Perl die korrekte Zeit abfragen, ausgeben


In diesem Tipp erhalten Sie grundlegende Informationen zum Verarbeiten und Bearbeiten von Datums- und Uhrzeitangaben in Perl. Wenn Sie die Funktion localtime

... Perl Tip



3D.Benchmark.OK # AlwaysMouseWheel # AutoHideDesktopIcons # AutoPowerOptionsOK # ClassicDesktopClock # DasSindMeineDateien # DesktopDigitalClock # DesktopNoteOK # DesktopOK # DontSleep # Edge-Chromium # ExperienceIndexOK # Find.Same.Images.OK # FontViewOK # GetPixelColor # GetWindowText # Internet # IsMyHdOK # JavaScript # NewFileTime # OpenCloseDriveEject # OpenGL # Perl # PhotoResizerOK # Q-Dir # QuickMemoryTestOK # QuickTextPaste # Registry # ShortDoorNote # SicherLoeschen # StressMyPC # System # TheAeroClock # Tools # WinScan2PDF #




    

  + Freeware
  + Ordnung am PC
  + Dateiverwaltung
  + Automatisierung
  + Office Tools
  + PC-Test-Tools
  + Deko und Spaß
  + Desktop-Uhren

  + SoftwareOK Pages
  + Micro Staff
  + Freeware-1
  + Freeware-2
  + Freeware-3
  + FAQ
  + Downloads

  + Top
  + Desktop-OK
  + The Quad Explorer
  + Don't Sleep
  + Win-Scan-2-PDF
  + Quick-Text-Past
  + Print Folder Tree
  + Find Same Images
  + Experience-Index-OK
  + Font-View-OK


  + Freeware
  + ShortDoorNote
  + IsMyHdOK
  + OpenCloseDriveEject
  + Print.Test.Page.OK
  + DesktopDigitalClock
  + IsMyLcdOK
  + AutoHideMouseCursor
  + PreventTurnOff
  + AutoHideDesktopIcons
  + PAD-s

Partnerseite:

Home | Danke | Kontakt | Link | FAQ | Windows 2021 | Windows 2015 | eBlog | English-AV | Impressum | Translate | PayPal | PAD-s

 © 2023 by Nenad Hrg ERR2: softwareok.de • softwareok.de • softwareok.com • softwareok.eu
0.093


► Bei Windows 7 DSL (PPPoE) Internet gemeinsam nutzen? ◄

► Was ist ein Auto-Text? ◄

► Wo finde ich den PC Leistungsindex in Windows 8.1 / 10 (Computer, Bewertung)? ◄

Durch die Nutzung meiner Webseite erklären Sie sich damit einverstanden, dass diese Cookies verwenden. mehr Infos & Datenschutz
....