difference entre die et exit ?
bonjour,
quelle est la difference entre die et exit ?
par exemple si j'utilise ces deux petits bouts de code ( le fichier n'existant pas ) :
Code:
1 2 3 4 5 6 7 8 9 10
| #!/usr/bin/perl
use strict;
use warnings;
open ( FIC , "< blabla.txt" ) or die( $! );
while ( <FIC> ) {
print $_."\n";
}
close ( FIC ); |
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
| #!/usr/bin/perl
use strict;
use warnings;
sub quit {
my $opt = shift;
print $opt."\n";
exit;
}
open ( FIC , "< blabla.txt" ) or &quit( $!." ( blabla.txt )" );
while ( <FIC> ) {
print $_."\n";
}
close ( FIC ); |
j'obtiens respectivement:
Code:
1 2
| ours@ourson:~/Progra/Perl/DieOrExit$ perl die.pl
Aucun fichier ou dossier de ce type at die.pl line 6. |
Code:
1 2
| ours@ourson:~/Progra/Perl/DieOrExit$ perl exit.pl
Aucun fichier ou dossier de ce type ( blabla.txt ) |
une difference quelconque hormis la présentation ? ( que perso je trouve plus belle sur un exit )
cordialement
ours