Perl PHP在Web開發中的代碼重構案例

代碼重構是提高代碼質量和可維護性的重要過程。下面我將為您提供一個簡單的Perl和PHP在Web開發中的代碼重構案例。

假設我們有一個簡單的Web應用程序，用于計算兩個數的和。這個應用程序使用Perl和PHP編寫。我們將分別展示Perl和PHP的原始代碼，然后提供重構后的代碼。

Perl原始代碼：

#!/usr/bin/perl
use strict;
use warnings;

use CGI qw(:standard);

print "Content-type: text/html\n\n";

my $num1 = param('num1');
my $num2 = param('num2');

my $sum = $num1 + $num2;

print "<h1>Sum: $sum</h1>";

PHP原始代碼：

<?php
header("Content-type: text/html");

$num1 = $_GET['num1'];
$num2 = $_GET['num2'];

$sum = $num1 + $num2;

echo "<h1>Sum: $sum</h1>";
?>

重構后的Perl代碼：

#!/usr/bin/perl
use strict;
use warnings;
use CGI qw(:standard);

my $schema = {
    num1 => '',
    num2 => '',
};

validate_params($schema);

my $sum = $schema->{num1} + $schema->{num2};

print "Content-type: text/html\n\n";
print "<h1>Sum: $sum</h1>";

sub validate_params {
    my ($schema) = @_;

    foreach my $key (keys %$schema) {
        if (!defined $schema->{$key} || $schema->{$key} eq '') {
            die "Invalid parameter: $key";
        }
    }
}

重構后的PHP代碼：

<?php
header("Content-type: text/html");

$schema = [
    'num1' => '',
    'num2' => '',
];

validate_params($schema);

$sum = $schema['num1'] + $schema['num2'];

echo "<h1>Sum: $sum</h1>";

function validate_params(&$schema) {
    foreach ($schema as $key => $value) {
        if (!isset($value) || $value === '') {
            die "Invalid parameter: $key";
        }
    }
}
?>

在重構后的代碼中，我們將參數驗證邏輯提取到了單獨的函數中，使代碼更加模塊化和可維護。同時，我們使用了關聯數組來存儲參數，使代碼更具可讀性。