Files
2004-perl/foiler/07_joining.pl
2025-03-05 11:15:13 +01:00

26 lines
870 B
Perl

#!/usr/bin/perl
use strict; use warnings;
## Hvordan slå sammen tekst (også likt som i PHP, av samme grunn)
# Flere tekststrenger slås sammen med punktum (Java bruker pluss).
my $fornavn = "Kjell Magne";
my $etternavn = "Bondevik";
my $fulltnavn = $fornavn . ' ' . $etternavn;
# Vi kunne selvsagt også brukt dette, som også er mye vanligere å bruke:
$fulltnavn = "$fornavn $etternavn";
# Men av og til er "" upraktisk, som f.eks. om du skal printe ut HTML,
# eller har verdiene i noe annet enn variabler.
my %verdier = ('uid' => 1015, 'bnavn' => 'kjellmangle');
# Dette:
print '<a href="' . $verdier{'uid'} . '">' . $verdier{'bnavn'} . "</a>\n";
# Er penere enn dette:
print "<a href=\"$verdier{'uid'}\">$verdier{'bnavn'}</a>\n";
# Men begge virker, selv om highlightingen min ikke tror det.
# At noe virker men blir highlightet feil er ofte et hint. Ta hintet.