Linkit - #7472 (Perl/CGI) - Perl-Community.de

renee

2006-05-02 14:44

User since
2003-08-04
14371 Artikel
ModeratorIn

Nimm das "#" x80 noch beim Eintragen der URL raus... Und mach noch

Code: (dl )

  while(my $line = <F>){
   chomp $line;
   next unless($. >=2 );
   if($. % 2 == 0){
      print $cgi->p('',$cgi->a( {-href => $url}, $line ) );
   }
   else{
     $url = $line;
   }
 }
 close F;

anstatt

Code: (dl )

  while(my $line = <F>){
   chomp $line;
   if($. % 2 == 0){
      print $cgi->p('',$cgi->a( {-href => $url}, $line ) );
   }
   else{
     $url = $line;
   }
 close F;

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/