Thread Kurzfassung If-Bedingung (23 answers)
Opened by Jan at 2018-01-11 15:57

rosti
 2018-01-12 17:18
#187891 #187891
User since
2011-03-19
3245 Artikel
BenutzerIn
[Homepage]
user image
Jow, da machen wir den Hash zur Referenz, segnen diese mit dem Namen der aktuellen Package und rufen mit dieser so erzeugten Instanz einfach nur noch Methoden auf:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10

my $itemSet = bless{ item => {} };

sub desc{
    my $self = shift;
    my $descr = shift;
    $descr =~ s{\n}{<br>}g if $descr !~ m{WYSIWYG}i;
    $self->{item}{description} = $descr;
}

$itemSet->desc("hier die Beschreibung mit einem WySi reingefummelt..\nneue Zeile");



. Fertig ;)

View full thread Kurzfassung If-Bedingung