The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Prty::Converter - Konvertierung von Werten

BASE CLASS

Prty::Object

METHODS

Zeichenketten

textToHtml() - Wandele Text nach HTML

Synopsis

    $html = $this->textToHtml($text);

Description

Ersetze in $text die Zeichen &, < und > durch HTML-Entities und liefere das Resultat zurück.

umlautToAscii() - Wandele deutsche Umlaute und SZ nach ASCII

Synopsis

    $class->umlautToAscii(\$str);
    $newStr = $class->umlautToAscii($str);

Description

Schreibe ä, Ä, ö, Ö, ü, Ü, ß in ae, Ae, oe, Oe, ue, Ue, ss um und liefere das Resultat zurück. Wird eine Stringreferenz angegeben, findet die Umschreibung "in-place" statt.

Die Methode setzt voraus, dass der String korrekt dekodiert wurde.

Zahlen

germanToProgramNumber() - Wandele deutsche Zahldarstellung in Zahl

Synopsis

    $x = $this->germanToProgramNumber($germanX);

Description

Wandele deutsche Zahldarstellung mit Punkt (.) als Stellen-Trenner und Komma (,) als Dezimaltrennzeichen in eine Zahl der Programmiersprache und liefere das Resultat zurück.

intToWord() - Wandele positive ganze Zahl in Wort über Alphabet

Synopsis

    $word = $this->intToWord($n);
    $word = $this->intToWord($n,$alphabet);

Returns

Zeichenkette

Description

Wandele positive ganze Zahl $n in ein Wort über dem Alphabet $alphabet und liefere dieses zurück. Für 0 liefere einen Leerstring.

Das Alphabet, über welchem die Worte gebildet werden, wird in Form einer Zeichenkette angegeben, in der jedes Zeichen einmal vorkommt. Per Default wird das Alphabet

    'ABCDEFGHIJKLMNOPQRSTUVWXYZ'

verwendet. Die Funktion implementiert folgende Abbildung:

    0 -> ''
    1 -> 'A'
    2 -> 'B'
    
    ...
    26 -> 'Z'
    27 -> 'AA'
    28 -> 'AB'
    ...
    52 -> 'AZ'
    53 -> 'BA'
    ...

Zeitdarstellung

epochToDuration() - Wandele Sekunden in (lesbare) Angabe einer Dauer

Synopsis

    $str = $class->epochToDuration($epoch,$truncate,$format);

Alias

secondsToDuration()

Description

Wandele eine Zeitangabe in Sekunden in eine Zeichenkette der Form

    HH:MM:SS  ($format nicht angegeben oder 1)

oder

    HHhMMmSSs ($format == 2)

oder

    HhMmSs ($format == 3)

timestampToEpoch() - Wandele Timestamp in lokaler Zeit nach Epoch

Synopsis

    $t = $class->timestampToEpoch($timestamp);

Description

Es wird vorausgesetzt, dass der Timestamp das Format

    YYYY-MM-DD HH24:MI:SSXFF

hat.

Fehlende Teile werden als 0 angenommen, so dass insbesondere auch folgende Formate gewandelt werden können:

    YYYY-MM-DD HH24:MI:SS    (keine Sekundenbruchteile)
    YYYY-MM-DD               (kein Zeitanteil)

Diese Methode ist z.B. nützlich, um einen Oracle-Timestamp (in lokaler Zeit) nach Epoch zu wandeln.

epochToTimestamp() - Wandele Epoch in Timestamp in lokaler Zeit

Synopsis

    $timestamp = $class->epochToTimestamp($t);

Description

Wandele Epoch-Wert $t in einen Timestamp der lokalen Zeitzone um und liefere diesen zurück.

See Also

"timestampToEpoch"()

Array/Hash

stringToKeyVal() - Wandele Zeichenkette in Schüssel/Wert-Paare

Synopsis

    $arr|@arr = $class->stringToKeyVal($str);

Description

Liefere die in der Zeichenkette enthaltenen Schlüssel/Wert-Paare.

Die Schlüssel/Wert-Paare haben die Form:

    $key="$val"

Wenn $val kein Whitespace enthält, können die Anführungsstriche weggelassen werden:

    $key=$val

Example

    $class->stringToKeyVal(q|var1=val1 var2="val2"|);
    =>
    ('var1','val1','var2','val2a')

Caveats

Wenn $val mit einem doppelten Anführungsstrich beginnt, darf $val keine doppelten Anführungsstiche enthalten.

VERSION

1.122

AUTHOR

Frank Seitz, http://fseitz.de/

COPYRIGHT

Copyright (C) 2018 Frank Seitz

LICENSE

This code is free software; you can redistribute it and/or modify it under the same terms as Perl itself.