1Fsdb::Support(3) User Contributed Perl Documentation Fsdb::Support(3)
2
3
4
6 Fsdb::Support - support routines for Fsdb
7
9 This class contains the bits of Fsdb::Old that needed to be kept.
10
13 progname
14 Generate the name of our program for error messages.
15
17 default_in(@READER_OPTIONS)
18 Generate a default Fsdb::Reader object with the given READER_OPTIONS
19
20 default_out(@WRITER_OPTIONS)
21 Generate a default Fsdb::Writer object with the given READER_OPTIONS
22
24 code_prettify
25 Convert db-code into "pretty code".
26
27 shell_quote
28 Convert output to shell-like quoting
29
31 number_prettify
32 Add-thousands-separators to numbers.
33
34 xxx: should consider locale.
35
36 (This code is from http://www.perlmonks.org/?node_id=653, contributed
37 by Andrew Johnson from University of Alberta.)
38
39 force_numeric
40 my $x = force_numeric($s, $include_non_numeric)
41
42 Return $S if it's numeric, or "undef" if not. If $INCLUDE_NON_NUMERIC,
43 then non-numeric values register as zero.
44
45 fullname_to_sortkey
46 my $sortkey = fullname_to_sortkey("John Smith");
47
48 Convert "Firstname Lastname" to sort key "lastname, firstname".
49
50 ddmmmyy_to_iso
51 my $iso_date = ddmmmyy_to_iso('1-Jan-10')
52
53 Converts a date in the form dd-mmm-yy to ISO-style yyyy-mm-dd.
54 Examples:
55
56 2-Jan-70 to 1970-01-02 2-Jan-99 to 1999-01-02 2-Jan-10 to 2010-01-02
57 2-Jan-69 to 2069-01-02 Jan-10 to 2010-01-00 99 to 1999-00-00
58
59 int_to_metric
60 my $value_str = int_to_metric(1000000);
61
62 Converts an integer into a string with its metric abbreviation.
63
64 1000 => 1k 1000000 => 1M
65
66
67
68perl v5.36.0 2023-01-20 Fsdb::Support(3)