welches last zieht? (Allgemeines zu Perl)

[thread]6101[/thread]

welches last zieht?

Reader: 1

esskar

2004-02-27 18:43

User since
2003-08-04
7321 articles
ModeratorIn

user image

Code: (dl )

sub last
{
   my $self = shift;

   # ...
}

sub uidl
{
   my $self = shift;
   # ...
   while(defined($line = $self->getline()))
   {
      $line =~ /^\.\s*$/ and last;
      # ...
   }

   # ...
}

laut conway, wird doch nun in der Schleife, das last des Objectes aufgerufen, oder?
Wenn ja, hilft dann CORE::last ?

2004-02-27 19:08

User since
2003-08-04
12209 articles
Admin1

nein, hier sollte das builtin last aufgerufen werden. um die subroutine
aufzurufen, müsstest du hier &last schreiben

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

esskar

2004-02-27 19:52

User since
2003-08-04
7321 articles
ModeratorIn

user image

danke

Crian

2004-02-27 20:13

User since
2003-08-04
5878 articles
ModeratorIn

Außerdem müsstest Du es ja als Methode über $self->last(...) aufrufen, was den Interpreter aber nicht davon abhalten könnte, es aufzurufen, wenn Du einfach so last(...) schreibst.

Aber dank pq wissen wir ja jetzt, dass er das nicht macht. Vielleicht könntest Du trotzdem CORE::last schreiben der Deutlichkeit halber, oder ist das eingebaute last keine Funktion, sondern ein schlüsselwortartiger Befehl?

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

esskar

2004-02-27 20:40

User since
2003-08-04
7321 articles
ModeratorIn

user image

nein, ist ne funktion.
perldoc -f last

View all threads created 2004-02-27 18:43.