oak-perl 0.0.11

Perl scripting language parser with support for text processing, system administration, and modern Perl features.
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

#![doc = include_str!("readme.md")]

use crate::ast::PerlRoot;

/// Perl code formatter
pub struct PerlFormatter {
    /// Indentation level
    pub indent_level: usize,
    /// Indentation string
    pub indent_str: String,
}

impl PerlFormatter {
    /// Creates a new Perl formatter
    pub fn new() -> Self {
        Self { indent_level: 0, indent_str: "    ".to_string() }
    }

    /// Formats the given Perl source code string
    pub fn format(&self, source: &str) -> String {
        source.to_string()
    }

    /// Formats the Perl AST root node
    pub fn format_ast(&self, _root: &PerlRoot) -> String {
        String::new()
    }
}

impl Default for PerlFormatter {
    fn default() -> Self {
        Self::new()
    }
}