Help for this page
Select Code to Download
Select
or
download this
$filename = (undef, undef, $images[$n]->{imagename}) = (File::Spec->splitpath( $_, 0 ));
Select
or
download this
(undef, undef, $filename = $images[$n]->{imagename}) = (File::Spec->splitpath( $_, 0 ));