18 lines
683 B
Perl
18 lines
683 B
Perl
#!/usr/bin/perl
|
|
use strict;
|
|
use warnings;
|
|
|
|
## Noen siste ord om subrutiner
|
|
#
|
|
# I en del gammel eller dårlig kode vil du kanskje oppdage at alle
|
|
# subrutinekall er med '&' foran, og at ingenting er prototypet.
|
|
#
|
|
# Dette var slik subrutiner virket før. De sjekket ikke antall argumenter
|
|
# eller noe som helst, og man sa fra om at de var subrutiner med &.
|
|
# Det er fremdeles mulig å gjøre det slik av hensyn til bakoverkompatibilitet,
|
|
# men IKKE GJØR DET!
|
|
#
|
|
# Om man gjør dette forsvinner nemlig alle former for feilsjekking rett i
|
|
# rett i dass, siden &subrutine() slår av sjekking av antall argumenter og
|
|
# slikt. Dette er et kjempetriks for å skjule bugs. Just don't do it, okay?
|