>>>>> On Fri, 11 Sep 2015 09:20:47 +0200, Prunk Dump <prunkd...@gmail.com> said:
> if ($opt_i || $opt_s) { > $kernelsuffix = (glob "$nfsroot/boot/vmlinuz*$opt_s")[-1]; > if ! $kernelsuffix { > $kernelsuffix = (glob "$tftproot/vmlinuz*$opt_s")[-1]; > } > $kernelsuffix=~ s/.+vmlinuz-//; > die "No kernel found matching $tftproot/vmlinuz*$opt_s\n" unless $kernelsuffix; > } Nice idea. I've implemented it this way: if ($opt_i || $opt_s) { - $kernelsuffix = (glob "$tftproot/vmlinuz*$opt_s")[-1]; + $kernelsuffix = (glob "$nfsroot/boot/vmlinuz*$opt_s")[-1]; + $kernelsuffix //= (glob "$tftproot/vmlinuz*$opt_s")[-1]; $kernelsuffix=~ s/.+vmlinuz-//; die "No kernel found matching $tftproot/vmlinuz*$opt_s\n" unless $kernelsuffix; } -- regards Thomas