Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl
[thread]6314[/thread]

Telefon Nr.>Name



<< |< 1 2 >| >> 18 Einträge, 2 Seiten
darkman
 2004-06-06 19:31
#83066 #83066
User since
2004-06-06
2 Artikel
BenutzerIn
[default_avatar]
Hi,
Ich würd gern Rückwärts im telefonbuch suchen *lol*

Z.B HIER

Ich habe mir das so vorgestellt da es nicht für mich gedacht ist sondern für meine mum das ich das dann mit perl/tk mache.
Stehe noch am anfang mit perl.. also meine frage wie gehe ich das am besten an?
Relais
 2004-06-06 19:33
#83067 #83067
User since
2003-08-06
2244 Artikel
ModeratorIn
[Homepage] [default_avatar]
Wir können Dir erklären, wie Du mit Perl umgehen kannst.

Kannst Du uns denn erklären, wie man rückwärts im Telefonbuch sucht?
Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming
[E|B]
 2004-06-06 19:56
#83068 #83068
User since
2003-08-08
2561 Artikel
HausmeisterIn
[Homepage] [default_avatar]
@Relais

Du nimmst das Telefonbuch, gehst rückwärts und suchst gleichzeitig darin. Dann hast du rückwärts im Telefonbuch gesucht. :D
Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]
steinwolf
 2004-06-06 19:59
#83069 #83069
User since
2003-08-04
367 Artikel
BenutzerIn
[default_avatar]
@ Relais, siehe Überschrift Nr > Name
@ darkman: verzeihung wenn ich mich da einmische, aber sowas ist verboten. btw ich arbeite bei der Telekom ;)
"Did you know? You can use your old motor oil to fertilize your lawn." - Blinkster - Professionelles EDV Forum
Relais
 2004-06-06 20:07
#83070 #83070
User since
2003-08-06
2244 Artikel
ModeratorIn
[Homepage] [default_avatar]
[quote=steinwolf,06.06.2004, 17:59]@ Relais, siehe Überschrift Nr > Name[/quote]
@Steinwolf: ich verstehe nicht, was an Deiner Erklärung erklärt. Oder anders gesagt: Erklär mal, wie man das macht, von der Nummer aus zum Namen suchen. Auf eine Art und Weise, daß ich einen Algorhythmus dazu entwickeln könnte.
Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming
steinwolf
 2004-06-06 20:11
#83071 #83071
User since
2003-08-04
367 Artikel
BenutzerIn
[default_avatar]
über dieses webtelefonbuch garnicht :p

Die Telekom hat, sofern ich mich richtig erinnere eine Art "Bug" in seinem Onlineregister, sodass man durch die Eingabe von Telefonnummern den entsprechenden Eigentümer finden konnte. Ist aber zum Glück aufgehoben und VERBOTEN.

Diese Form des Missbrauch wird unter Umständen auch geahndet..

mfg stein
"Did you know? You can use your old motor oil to fertilize your lawn." - Blinkster - Professionelles EDV Forum
Gast Gast
 2004-06-06 20:43
#83072 #83072
wie jetzt? wenn mein telefon mir ne nr anzeigt darf ich nich rausfinden wer das war? is doch schwachsinn..ich könnt ja auch im telefonbuch suchen...dauert bloß halt ewig...und ich würd gern wissen wers war..bzw meine mum..ohne da anrufen zu müssen...
Relais
 2004-06-06 21:00
#83073 #83073
User since
2003-08-06
2244 Artikel
ModeratorIn
[Homepage] [default_avatar]
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
use Data::Dumper;

my %hash = (
    Titanic => [ "Anno 1912", "Southampton" ],
    Cheopspyramide => [ "Anno ca. -3000 plusminus 1500", "Gizeh" ],
    Perl => [ "Kamel" ],
);

my %reverse_lookup;

foreach my $arrayref ( keys %hash ) {
    foreach my $element ( @{ $hash{$arrayref} } ) {
        $reverse_lookup{$element} = $arrayref;
    }
}

print Dumper \%reverse_lookup;
Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming
steinwolf
 2004-06-06 21:31
#83074 #83074
User since
2003-08-04
367 Artikel
BenutzerIn
[default_avatar]
[quote=Guest,06.06.2004, 18:43]wie jetzt? wenn mein telefon mir ne nr anzeigt darf ich nich rausfinden wer das war? is doch schwachsinn..ich könnt ja auch im telefonbuch suchen...dauert bloß halt ewig...und ich würd gern wissen wers war..bzw meine mum..ohne da anrufen zu müssen...[/quote]
Ich finde eine gewisse Anonymität ist das schon, da sich ja keiner an die Arbeit macht und im Telefonbuch sucht!! Und da diese Programme verboten sind, ist es mit erheblich höherem Aufwand verbunden, mittels der Telefonnummer den Besitzer herauszufinden.
"Did you know? You can use your old motor oil to fertilize your lawn." - Blinkster - Professionelles EDV Forum
Crian
 2004-06-06 21:59
#83075 #83075
User since
2003-08-04
5866 Artikel
ModeratorIn
[Homepage]
user image
Die Polizei darf das mit Sicherheit.
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
<< |< 1 2 >| >> 18 Einträge, 2 Seiten



View all threads created 2004-06-06 19:31.