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

NAME

Quiq::LineProcessor::Line - Zeile einer Datei

BASE CLASS

Quiq::Object

DESCRIPTION

Ein Objekt der Klasse repräsentiert eine Zeile, bestehend aus dem Zeileninhalt (Text) und einer Zeilennummer.

METHODS

Konstruktor

new() - Instantiiere Zeilen-Objekt

Synopsis

  $ln = $class->new($text,$number,\$input);

Description

Instantiiere Zeilenobjekt und liefere eine Referenz auf dieses Objekt zurück.

Akzessoren

text() - Liefere/Setze Zeilentext

Synopsis

  $text = $ln->text;
  $text = $ln->text($text);
  $text = $ln->text($text,$strip);

Description

Liefere den Zeilentext. Ist ein Argument angegeben, setze den Zeilentext auf den Wert. Ist $strip wahr, entferne Whitespace am Zeilenende. Dadurch werden Zeilen, die nur aus Whitespace bestehen, zu Leerzeilen.

textNl() - Liefere Zeilentext mit Newline

Synopsis

  $text = $ln->textNl;

Description

Liefere den Zeilentext mit einem angehängten Newline.

number() - Liefere/Setze Zeilennummer

Synopsis

  $n = $ln->number;
  $n = $ln->number($n);

inputR() - Liefere/Setze Referenz auf Input-Bezeichnung

Synopsis

  $inputR = $ln->inputR;
  $inputR = $ln->inputR(\$input);

Description

Liefere/Setze eine Referenz auf die Input-Bezeichung.

input() - Liefere die Input-Bezeichnung

Synopsis

  $input = $ln->input;

Eigenschaften

isEmpty() - Test auf Leerzeile

Synopsis

  $bool = $ln->isEmpty;

Description

Liefere "wahr", wenn Zeile eine Leerzeile ist, andernfalls "falsch".

indentation() - Liefere Einrücktiefe der Zeile

Synopsis

  $n = $ln->indentation;

Description

Liefere die Tiefe der Einrückung. Die Einrücktiefe ist die Anzahl an Whitespacezeichen am Anfang der Zeile.

length() - Liefere Zeilenlänge

Synopsis

  $n = $ln->length;

Description

Liefere die Länge der Zeile.

Operationen

append() - Füge Text zu Zeile hinzu

Synopsis

  $ln->append($text);

Description

Füge $text zu Zeile $ln hinzu. Die Methode liefert keinen Wert zurück.

trim() - Entferne Whitespace am Anfang und Ende

Synopsis

  $ln->trim;

Description

Entferne Whitespace am Anfang und am Ende der Zeile. Die Methode liefert keinen Wert zurück.

unindent() - Entferne Einrückung

Synopsis

  $ln->unindent($n);

Description

Entferne die ersten $n Zeichen von der Zeile. Die Methode liefert keinen Wert zurück.

Externe Repräsentation

dump() - Liefere externe Repräsentation

Synopsis

  $str = $ln->dump($format);
  $str = $ln->dump;

Description

Erzeuge eine externe Zeilenrepräsentation in Format $format und liefere diese zurück.

Formate

0

Text der Zeile plus Newline (Default).

1

Text der Zeile plus Newline und vorangestellter Zeilennummer im Format:

  NNNN: TEXT

VERSION

1.210

AUTHOR

Frank Seitz, http://fseitz.de/

COPYRIGHT

Copyright (C) 2023 Frank Seitz

LICENSE

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