首先，不是在BASH腳本中使用$USERNAME。 $USERNAME是一個包含當前用戶名的BASH變量。實際上，在BASH中使用UPPERCASE變量通常是一個糟糕的主意。大多數BASH環境變量都是大寫字母，可能會導致混淆。讓你的變量小寫是個好習慣。

此外，因為我想你想要使用HTML表單來做到這一點，所以你不能讓BASH從STDIN中讀取數據。修改游腳本以將用戶名作為參數：

BASH：

#!/bin/bash

user=$1;

DISPLAYNAME=`ldapsearch -p xxx -LLL -x -w test -h abc.com -D abc -b dc=abc,dc=com sAMAccountName=$user | grep displayName`

if [ -z "$DISPLAYNAME" ]; then

echo "No entry found for $user"

else

echo "Entry found for $user"

fi

的Perl：

#!/usr/bin/perl

use CGI qw(:standard);

use CGI::Carp qw(warningsToBrowser fatalsToBrowser);

use strict;

use warnings;

## Create a new CGI object

my $cgi = new CGI;

## Collect the value of 'user_name' submitted by the webpage

my $name=$cgi->param('user_name');

## Run a system command, your display_name.sh,

## and save the result in $result

my $result=`./display_name.sh $name`;

## Print the HTML header

print header;

## Print the result

print "$result
";

HTML：

這應該做你所需要的。它假設這兩個腳本都位于網頁的./cgi-bin/目錄中，并被稱為display_name.sh和display_name.pl。它還假定你已經正確設置了他們的權限(他們需要由apache2的用戶www-data執行)。最后，它假定您已經設置了apache2來允許執行./cgi-bin中的腳本。

是否有您想使用BASH的特定原因？您可以直接從Perl腳本執行所有操作：

#!/usr/bin/perl

use CGI qw(:standard);

use CGI::Carp qw(warningsToBrowser fatalsToBrowser);

use strict;

use warnings;

## Create a new CGI object

my $cgi = new CGI;

## Collect the value of 'name' submitted by the webpage

my $name=$cgi->param('user_name');

## Run the ldapsearch system command

## and save the result in $result

my $result=`ldapsearch -p xxx -LLL -x -w test -h abc.com -D abc -b dc=abc,dc=com sAMAccountName=$name | grep displayName`;

## Print the HTML header

print header;

## Print the result

$result ?

print "Entry found for $name
" :

print "No entry found for $name
";

總結

以上是生活随笔為你收集整理的html中显示shell脚本的输出,网页从shell脚本中输入并显示结果的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。