@lines = split(/\n/,$decrypted);
$num_lines = @lines;