| 1589 | | $uploaded =~ s!\\!/!g; ## Change backslashes to forward slashes |
| 1590 | | $uploaded =~ s!^.*/!!; ## Get rid of full directory paths |
| 1591 | | if ( $uploaded =~ m!\.\.|\0|\|! ) { |
| 1592 | | $param->{error} = $app->translate( "Invalid filename '[_1]'", $uploaded ); |
| 1593 | | return $app->load_tmpl( 'dialog/restore_upload.tmpl', $param ); |
| 1594 | | } |
| 1595 | | $uploaded = Encode::is_utf8( $uploaded ) ? $uploaded |
| 1596 | | : Encode::decode( $app->charset, $uploaded ) |
| 1597 | | ; |
| | 1589 | if ( defined($uploaded) ) { |
| | 1590 | $uploaded =~ s!\\!/!g; ## Change backslashes to forward slashes |
| | 1591 | $uploaded =~ s!^.*/!!; ## Get rid of full directory paths |
| | 1592 | if ( $uploaded =~ m!\.\.|\0|\|! ) { |
| | 1593 | $param->{error} = $app->translate( "Invalid filename '[_1]'", $uploaded ); |
| | 1594 | return $app->load_tmpl( 'dialog/restore_upload.tmpl', $param ); |
| | 1595 | } |
| | 1596 | $uploaded = Encode::is_utf8( $uploaded ) ? $uploaded |
| | 1597 | : Encode::decode( $app->charset, $uploaded ) |
| | 1598 | ; |
| | 1599 | } |
